සරල, මුලින්ම බැලූ බැල්මට, පැහැදිලි නොවන විසඳුමක් සමඟ ගැටළුවක්: පෙළ පේළියකින් අවසාන වචනය උපුටා ගන්න. හොඳයි, හෝ, සාමාන්‍ය අවස්ථාවෙහි, දී ඇති පරිසීමක අක්ෂරයකින් (අවකාශය, කොමාව, ආදිය) වෙන් කරන ලද අවසාන කොටස, වෙනත් වචන වලින් කිවහොත්, a තන්තුවෙහි ප්‍රතිලෝම සෙවීමක් (අවසානයේ සිට ආරම්භය දක්වා) ක්‍රියාත්මක කිරීම අවශ්‍ය වේ. අක්ෂරය ලබා දී එහි දකුණට ඇති සියලුම අක්ෂර උපුටා ගන්න.
සාම්ප්‍රදායිකව තෝරා ගැනීමට ක්‍රම කිහිපයක් බලමු: සූත්ර, මැක්රෝ සහ බල විමසුම හරහා.
ක්රමය 1. සූත්ර
සූත්‍රයේ සාරය සහ යාන්ත්‍ර විද්‍යාව තේරුම් ගැනීම පහසු කිරීම සඳහා, අපි දුර සිට ටිකක් පටන් ගනිමු. පළමුව, අපගේ මූලාශ්‍ර පෙළෙහි වචන අතර ඇති හිස්තැන් සංඛ්‍යාව, උදාහරණයක් ලෙස, කෑලි 20 දක්වා වැඩි කරමු. ඔබට මෙය ප්‍රතිස්ථාපන කාර්යය සමඟ කළ හැකිය. විෂය (ආදේශක) සහ දී ඇති අක්ෂරයක් N-වරක් පුනරාවර්තනය කිරීමේ කාර්යය - නැවත නැවත කරන්න (REPT):
දැන් අපි ශ්රිතය භාවිතයෙන් ලැබෙන අකුරු අවසානයේ අක්ෂර 20 ක් කපා දමමු රයිට් (අයිතිය):
එන්න එන්නම උණුසුම් වෙනවා නේද? ශ්රිතය භාවිතයෙන් අමතර අවකාශයන් ඉවත් කිරීමට එය ඉතිරිව ඇත TRIM (TRIM) සහ ගැටළුව විසඳනු ඇත:
ඉංග්‍රීසි අනුවාදයේ, අපගේ සූත්‍රය මේ ආකාරයෙන් පෙනෙනු ඇත:
=TRIM(දකුණ(ආදේශක(A1;»;REPT(";20));20))
ප්‍රතිපත්තිමය වශයෙන් හරියටම හිස් තැන් 20 ක් ඇතුළත් කිරීම අවශ්‍ය නොවන බව පැහැදිලි යැයි මම බලාපොරොත්තු වෙමි - මූලාශ්‍ර පෙළෙහි ඇති දිගම වචනයේ දිගට වඩා වැඩි වන තාක් ඕනෑම අංකයක් කරනු ඇත.
මූලාශ්‍ර පාඨය ඉඩකින් නොව වෙනත් බෙදුම් අක්ෂරයකින් බෙදීමට අවශ්‍ය නම් (උදාහරණයක් ලෙස, කොමාවකින්), එවිට අපගේ සූත්‍රය තරමක් නිවැරදි කිරීමට අවශ්‍ය වනු ඇත:
ක්රමය 2. මැක්රෝ ශ්රිතය
පාඨයෙන් අවසාන වචනය හෝ ඛණ්ඩය උකහා ගැනීමේ කාර්යය මැක්‍රෝස් භාවිතයෙන් විසඳිය හැකිය, එනම් විෂුවල් බේසික් හි ප්‍රතිලෝම සෙවුම් ශ්‍රිතයක් ලිවීමෙන් අපට අවශ්‍ය දේ කරනු ඇත - ලබා දී ඇති උපස්ථරයක් ප්‍රතිවිරුද්ධ දිශාවට නූලක සොයන්න - වෙතින් අවසානය සිට ආරම්භය දක්වා.
යතුරුපුවරු කෙටිමඟ ඔබන්න alt+F11 හෝ බොත්තම දෘශ්ය මූලික ටැබ් සංවර්ධක (සංවර්ධක)සාර්ව සංස්කාරකය විවෘත කිරීමට. ඉන්පසු මෙනුව හරහා නව මොඩියුලයක් එක් කරන්න ඇතුල් කරන්න - මොඩියුලය සහ පහත කේතය එහි පිටපත් කරන්න:
Function LastWord(txt String ලෙස, Optional delim ලෙස String = " ", Optional n As Integer = 1) String arFragments = Split(txt, delim) LastWord = arFragments(UBound(arFragments) - n + 1) End Function
දැන් ඔබට වැඩපොත සුරැකිය හැක (සාර්ව සක්‍රීය ආකෘතියකින්!) සහ පහත වාක්‍ය ඛණ්ඩයේ සාදන ලද ශ්රිතය භාවිතා කරන්න:
=LastWord(txt ; delim ; n)
එහිදී
- txt - මූලාශ්‍ර පෙළ සහිත සෛලය
- delim - බෙදුම්කරු චරිතය (පෙරනිමිය - අවකාශය)
- n - අවසානයෙන් උපුටා ගත යුතු වචනය (පෙරනිමියෙන් - අවසානයෙන් පළමු)
අනාගතයේදී මූලාශ්‍ර පෙළෙහි කිසියම් වෙනසක් සිදු වුවහොත්, ඕනෑම සම්මත Excel පත්‍ර ශ්‍රිතයක් මෙන් අපගේ සාර්ව ශ්රිතය පියාසර කරන විට නැවත ගණනය කරනු ලැබේ.
ක්රමය 3. බල විමසුම
බල විමසුම ඕනෑම මූලාශ්‍රයකින් පාහේ Excel වෙත දත්ත ආයාත කිරීමට සහ පසුව බාගත කළ දත්ත ඕනෑම ආකාරයකට පරිවර්තනය කිරීමට Microsoft වෙතින් නොමිලේ ඇඩෝනයකි. මෙම ඇඩෝනයේ බලය සහ සිසිලස කොතරම්ද යත් මයික්‍රොසොෆ්ට් එහි සියලුම විශේෂාංග Excel 2016 වෙත පෙරනිමියෙන් ගොඩනගා ඇත. Excel 2010-2013 සඳහා Power Query මෙතැනින් නොමිලේ බාගත හැකිය.
Power Query භාවිතයෙන් ලබා දී ඇති බෙදුම්කරුවෙකු හරහා අවසාන වචනය හෝ කොටස වෙන් කිරීමේ අපගේ කාර්යය ඉතා පහසුවෙන් විසඳනු ලැබේ.
පළමුව, යතුරුපුවරු කෙටිමං භාවිතයෙන් අපගේ දත්ත වගුව ස්මාර්ට් වගුවක් බවට පත් කරමු. Ctrl+T හෝ විධාන නිවස - මේසයක් ලෙස හැඩතල ගැන්වීම (මුල් පිටුව - වගුවක් ලෙස ආකෘතිය):
ඉන්පසුව අපි නිර්මාණය කරන ලද "ස්මාර්ට් වගුව" විධානය භාවිතයෙන් Power Query වෙත පටවන්නෙමු වගුව/පරාසයෙන් (වගුව/පරාසයෙන්) ටැබ් දත්ත (ඔබට Excel 2016 තිබේ නම්) හෝ ටැබය මත බල විමසුම (ඔබට Excel 2010-2013 තිබේ නම්):
විවෘත වන විමසුම් සංස්කාරක කවුළුව තුළ, ටැබය මත පරිවර්තනය (පරිවර්තනය) කණ්ඩායමක් තෝරන්න තීරුව බෙදීම - පරිසීමකය අනුව (බෙදීම තීරුව - පරිසීමකය අනුව) ඉන්පසු එය බෙදුම්කරු අක්ෂරය සැකසීමට සහ විකල්පය තෝරා ගැනීමට ඉතිරිව ඇත දකුණුම පරිසීමකයසියලුම වචන කපා හැරීමට නොව, අවසාන එක පමණක් කපා දමන්න:
ක්ලික් කිරීමෙන් පසු OK අවසාන වචනය නව තීරුවකට වෙන් කරනු ලැබේ. අනවශ්‍ය පළමු තීරුව එහි ශීර්ෂය දකුණු-ක්ලික් කර තේරීමෙන් ඉවත් කළ හැක ඉවත් කරන්න (මකන්න). ඔබට වගු ශීර්ෂයේ ඉතිරි තීරුව නැවත නම් කළ හැක.
විධානය භාවිතයෙන් ප්‍රතිඵල නැවත පත්‍රයට උඩුගත කළ හැක නිවස - වසන්න සහ පැටවීම - වසන්න සහ පූරණය කරන්න ... (නිවස - වසන්න සහ පැටවීම - වසන්න සහ පූරණය කරන්න...):
සහ ප්රතිඵලයක් ලෙස අපට ලැබෙන්නේ:
මේ වගේ - ලාභ සහ ප්‍රීතිමත්, සූත්ර සහ මැක්‍රෝස් නොමැතිව, යතුරුපුවරුව ස්පර්ශ නොකරම පාහේ 🙂
අනාගතයේදී මුල් ලැයිස්තුව වෙනස් වුවහොත්, එය දකුණු-ක්ලික් කිරීමට හෝ යතුරුපුවරු කෙටිමඟක් භාවිතා කිරීමට ප්රමාණවත් වනු ඇත Ctrl+alt+F5 අපගේ ඉල්ලීම යාවත්කාලීන කරන්න.
- ඇලෙන සුළු පෙළ තීරුවලට බෙදීම
- නිත්‍ය ප්‍රකාශන සහිත පෙළ විග්‍රහ කිරීම සහ විග්‍රහ කිරීම
- SUBSTITUTE ශ්රිතය සමඟ පෙළෙන් පළමු වචන උපුටා ගැනීම