നേറ്റീവ് ഫോർമുലകളും ഇഷ്‌ടാനുസൃത ഫംഗ്‌ഷനുകളും ഉപയോഗിച്ച് Excel-ലെ നമ്പറുകളിൽ നിന്ന് ടെക്‌സ്‌റ്റ് വേർതിരിക്കുന്നത് എങ്ങനെയെന്ന് ഈ ട്യൂട്ടോറിയൽ നിങ്ങളെ പഠിപ്പിക്കും. ടെക്‌സ്‌റ്റും അക്കങ്ങളും രണ്ട് വ്യത്യസ്ത കോളങ്ങളായി വിഭജിക്കുന്നത് എങ്ങനെയെന്ന് നിങ്ങൾ പഠിക്കും.

ഇത് സങ്കൽപ്പിക്കുക: വിശകലനത്തിനായി നിങ്ങൾക്ക് അസംസ്‌കൃത ഡാറ്റ ലഭിക്കുകയും ഒരു കോളത്തിലെ ടെക്‌സ്‌റ്റുമായി സംഖ്യകൾ കലർന്നതായി കണ്ടെത്തുകയും ചെയ്യുക. മിക്ക സാഹചര്യങ്ങളിലും, സൂക്ഷ്മപരിശോധനയ്‌ക്കായി പ്രത്യേക കോളങ്ങളിൽ അവ ഉണ്ടായിരിക്കുന്നത് തീർച്ചയായും കൂടുതൽ സൗകര്യപ്രദമായിരിക്കും.

നിങ്ങൾ ഏകതാനമായ ഡാറ്റ ഉപയോഗിച്ചാണ് പ്രവർത്തിക്കുന്നതെങ്കിൽ, നിങ്ങൾക്ക് എക്‌സ്‌ട്രാക്‌റ്റുചെയ്യാൻ ഇടത്, വലത്, മിഡ് ഫംഗ്‌ഷനുകൾ ഉപയോഗിക്കാം. ഒരേ സ്ഥാനത്ത് നിന്ന് ഒരേ എണ്ണം പ്രതീകങ്ങൾ. എന്നാൽ ഇത് ലബോറട്ടറി പരിശോധനകൾക്ക് അനുയോജ്യമായ ഒരു സാഹചര്യമാണ്. യഥാർത്ഥ ജീവിതത്തിൽ, ടെക്‌സ്‌റ്റിന് മുമ്പോ ടെക്‌സ്‌റ്റിന് ശേഷമോ ടെക്‌സ്‌റ്റിന് ഇടയിലോ അക്കങ്ങൾ വരുന്ന വ്യത്യസ്‌ത ഡാറ്റയുമായി നിങ്ങൾ ഇടപെടാൻ സാധ്യതയുണ്ട്. ചുവടെയുള്ള ഉദാഹരണങ്ങൾ ഈ കേസിന് കൃത്യമായ പരിഹാരങ്ങൾ നൽകുന്നു.

എക്‌സൽ സെല്ലുകളിൽ ടെക്‌സ്‌റ്റ് നീക്കം ചെയ്‌ത് നമ്പറുകൾ എങ്ങനെ സൂക്ഷിക്കാം

പരിഹാരം Excel 365, Excel 2021-ൽ പ്രവർത്തിക്കുന്നു , കൂടാതെ Excel 2019

Microsoft Excel 2019 മുമ്പത്തെ പതിപ്പുകളിൽ ലഭ്യമല്ലാത്ത കുറച്ച് പുതിയ ഫംഗ്ഷനുകൾ അവതരിപ്പിച്ചു, ഒരു സെല്ലിൽ നിന്ന് ടെക്‌സ്‌റ്റ് പ്രതീകങ്ങൾ നീക്കം ചെയ്യാൻ ഞങ്ങൾ അത്തരം ഫംഗ്‌ഷനുകളിലൊന്നായ TEXTJOIN ഉപയോഗിക്കാൻ പോകുന്നു. അക്കങ്ങൾ അടങ്ങിയിരിക്കുന്നു.

ജനറിക് ഫോർമുല ഇതാണ്:

TEXTJOIN("", TRUE, IFERROR(MID( cell, ROW(INDIRECT( "1:""&LEN(<1")>സെൽ))), 1) *1, ""))

Excel 365-ലും 2021-ലും, ഇതും പ്രവർത്തിക്കും:

TEXTJOIN("", TRUE,IFERROR(MID( സെൽ, SEQUENCE(LEN( cell)), 1) *1, ""))

ആദ്യ കാഴ്ചയിൽ, സൂത്രവാക്യങ്ങൾ അൽപ്പം ഭയപ്പെടുത്തുന്നതായി തോന്നിയേക്കാം, പക്ഷേ അവ പ്രവർത്തിക്കുന്നു :)

ഉദാഹരണത്തിന്, A2-ലെ അക്കങ്ങളിൽ നിന്ന് ടെക്‌സ്‌റ്റ് നീക്കംചെയ്യുന്നതിന്, B2-ൽ ചുവടെയുള്ള ഫോർമുലകളിലൊന്ന് നൽകുക, തുടർന്ന് ആവശ്യമുള്ളത്ര സെല്ലുകളിലേക്ക് പകർത്തുക.

Excel 365 - 2019:

=TEXTJOIN("", TRUE, IFERROR(MID(A2, ROW(INDIRECT( "1:"&LEN(A2))), 1) *1, ""))

Excel 2019-ൽ, അത് Ctrl + Shift + Enter ഉപയോഗിച്ച് ഒരു അറേ ഫോർമുലയായി നൽകണം. ഡൈനാമിക് അറേ Excel-ൽ, Enter കീ ഉപയോഗിച്ച് പൂർത്തിയാക്കിയ ഒരു സാധാരണ ഫോർമുലയായി ഇത് പ്രവർത്തിക്കുന്നു.

Excel 365-ലും 2021-ലും:

=TEXTJOIN("", TRUE, IFERROR(MID(A2, SEQUENCE(LEN(A2)), 1) *1, ""))

ഫലമായി, എല്ലാ ടെക്‌സ്‌റ്റ് പ്രതീകങ്ങളും ഒരു സെല്ലിൽ നിന്ന് നീക്കം ചെയ്യുകയും അക്കങ്ങൾ സൂക്ഷിക്കുകയും ചെയ്യുന്നു:

ഈ ഫോർമുല എങ്ങനെ പ്രവർത്തിക്കുന്നു:

യുക്തി നന്നായി മനസ്സിലാക്കാൻ, നമുക്ക് അന്വേഷണം ആരംഭിക്കാം ഉള്ളിൽ നിന്നുള്ള സൂത്രവാക്യം:

മൊത്തം സംഖ്യയുമായി ബന്ധപ്പെട്ട ഒരു സംഖ്യയുടെ ഒരു ശ്രേണി സൃഷ്ടിക്കാൻ നിങ്ങൾ ROW(INDIRECT("1:"&LEN(string))) അല്ലെങ്കിൽ SEQUENCE(LEN(string)) ഉപയോഗിക്കുക സോഴ്സ് സ്‌ട്രിംഗിലെ പ്രതീകങ്ങൾ, തുടർന്ന് ആ സീക്വൻഷ്യൽ നമ്പറുകൾ പ്രാരംഭ നമ്പറുകളായി MID ഫംഗ്‌ഷനിലേക്ക് നൽകുക. B2-ൽ, ഫോർമുലയുടെ ഈ ഭാഗം ഇതുപോലെ കാണപ്പെടുന്നു:

MID(A2, {1;2;3;4;5;6;7;8;9;10;11;12;13;14;15}, 1)

MID ഫംഗ്‌ഷൻ A2-ൽ നിന്ന് ഓരോ പ്രതീകവും ആദ്യത്തേതിൽ നിന്ന് എക്‌സ്‌ട്രാക്റ്റ് ചെയ്യുകയും അവയെ ഒരു അറേ ആയി നൽകുകയും ചെയ്യുന്നു:

0> {"2";"1";"0";" ";"S";"u";"n";"s";"e";"t";" ";"R";"o";"a";"d"}

ഈ അറേയെ 1 കൊണ്ട് ഗുണിച്ചിരിക്കുന്നു. സംഖ്യാ മൂല്യങ്ങൾ ഒരു മാറ്റവുമില്ലാതെ നിലനിൽക്കുന്നു, അതേസമയം ഒരു നോൺ-ന്യൂമറിക് പ്രതീകം ഗുണിച്ചാൽ #VALUE ലഭിക്കും! പിശക്:

{2;1;0;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!}

IFERROR ഫംഗ്‌ഷൻ കൈകാര്യം ചെയ്യുന്നുഈ പിശകുകൾ കൂടാതെ അവയെ ശൂന്യമായ സ്‌ട്രിംഗുകൾ ഉപയോഗിച്ച് മാറ്റിസ്ഥാപിക്കുന്നു:

{2;1;0;"";"";"";"";"";"";"";"";"";"";"";""}

ഈ അന്തിമ അറേ TEXTJOIN ഫംഗ്‌ഷനിലേക്ക് നൽകുന്നു, ഇത് അറേയിലെ ശൂന്യമല്ലാത്ത മൂല്യങ്ങളെ സംയോജിപ്പിക്കുന്നു ( ignore_empty ഡിലിമിറ്ററിനായി ഒരു ശൂന്യമായ സ്ട്രിംഗ് ("") ഉപയോഗിച്ച് ആർഗ്യുമെന്റ് TRUE ആയി സജ്ജീകരിച്ചിരിക്കുന്നു:

TEXTJOIN("", TRUE, {2;1;0;"";"";"";"";"";"";"";"";"";"";"";""})

നുറുങ്ങ്. Excel 2016 - =SplitTextNumbers(A2, TRUE) ന്, ഒരു പരിഹാരവും നിലവിലുണ്ട്, എന്നാൽ ഫോർമുല കൂടുതൽ സങ്കീർണ്ണമാണ്. ഈ ട്യൂട്ടോറിയലിൽ നിങ്ങൾക്കത് കണ്ടെത്താനാകും: Excel-ൽ നമ്പറുകൾ എങ്ങനെ വേർതിരിച്ചെടുക്കാം.

നമ്പരുകളിൽ നിന്ന് വാചകം നീക്കം ചെയ്യുന്നതിനുള്ള ഇഷ്‌ടാനുസൃത പ്രവർത്തനം

എല്ലാ Excel പതിപ്പുകൾക്കും പരിഹാരം പ്രവർത്തിക്കുന്നു

നിങ്ങൾ Excel-ന്റെ പഴയ പതിപ്പാണ് ഉപയോഗിക്കുന്നതെങ്കിൽ അല്ലെങ്കിൽ മുകളിലുള്ള ഫോർമുലകളും കണ്ടെത്തുക ഓർക്കാൻ പ്രയാസമാണ്, ലളിതമായ വാക്യഘടനയും RemoveText പോലുള്ള ഉപയോക്തൃ-സൗഹൃദ നാമവും ഉപയോഗിച്ച് നിങ്ങളുടെ സ്വന്തം ഫംഗ്‌ഷൻ സൃഷ്‌ടിക്കുന്നതിൽ നിന്ന് ഒന്നും നിങ്ങളെ തടയുന്നില്ല. ഉപയോക്തൃ-നിർവചിച്ച ഫംഗ്‌ഷൻ (UDF) രണ്ട് തരത്തിൽ എഴുതാം:

VBA കോഡ് 1:

ഇവിടെ, സോഴ്‌സ് സ്‌ട്രിംഗിലെ ഓരോ പ്രതീകവും ഞങ്ങൾ നോക്കുന്നു ഒന്ന്, അത് അക്കമാണോ അല്ലയോ എന്ന് പരിശോധിക്കുക. ഒരു സംഖ്യയാണെങ്കിൽ, തത്ഫലമായുണ്ടാകുന്ന സ്‌ട്രിംഗിലേക്ക് പ്രതീകം ചേർക്കും.

ഫംഗ്‌ഷൻ RemoveText(string As String ) മങ്ങിക്കുക sRes As String sRes = "" for i = 1 To Len(str) True = IsNumeric(Mid(str, i) , 1)) അപ്പോൾ sRes = sRes & Mid(str, i, 1) End ആണെങ്കിൽ അടുത്തത് i RemoveText = sRes End Function

VBA കോഡ് 2:

ഒരു സാധാരണ എക്‌സ്‌പ്രഷൻ പ്രോസസ്സ് ചെയ്യുന്നതിന് കോഡ് ഒരു ഒബ്‌ജക്റ്റ് സൃഷ്‌ടിക്കുന്നു. RegExp ഉപയോഗിച്ച്, ഉറവിട സ്‌ട്രിംഗിൽ നിന്ന് 0-9 അക്കങ്ങൾ ഒഴികെയുള്ള എല്ലാ പ്രതീകങ്ങളും ഞങ്ങൾ നീക്കംചെയ്യുന്നു.

ഫംഗ്ഷൻ RemoveText(string As ) CreateObject ഉള്ള സ്ട്രിംഗ് ആയി ( "VBScript.RegExp" ) .Global = True .Pattern = "[^0-9]" RemoveText = .Replace(str, "" ) അവസാന ഫംഗ്ഷനോടെ അവസാനിക്കുക

ചെറിയ വർക്ക് ഷീറ്റുകളിൽ, രണ്ട് കോഡുകളും ഒരുപോലെ നന്നായി പ്രവർത്തിക്കും. ഫംഗ്‌ഷൻ നൂറുകണക്കിന് അല്ലെങ്കിൽ ആയിരക്കണക്കിന് തവണ വിളിക്കപ്പെടുന്ന വലിയ വർക്ക്ഷീറ്റുകളിൽ, VBScript.RegExp ഉപയോഗിക്കുന്ന കോഡ് 2 വേഗത്തിൽ പ്രവർത്തിക്കും.

നിങ്ങളുടെ വർക്ക്ബുക്കിൽ കോഡ് ചേർക്കുന്നതിനുള്ള വിശദമായ ഘട്ടങ്ങൾ ഇവിടെ കാണാം: VBA എങ്ങനെ ചേർക്കാം Excel-ലെ കോഡ്.

അവസാന ഉപയോക്തൃ വീക്ഷണകോണിൽ നിന്ന് നിങ്ങൾ ഏത് സമീപനം തിരഞ്ഞെടുക്കുന്നുവോ, ടെക്‌സ്‌റ്റ് ഇല്ലാതാക്കുന്നതിനും അക്കങ്ങൾ ഉപേക്ഷിക്കുന്നതിനുമുള്ള പ്രവർത്തനം ഇതുപോലെ ലളിതമാണ്:

RemoveText(string)

ഉദാഹരണത്തിന്, A2 സെല്ലിൽ നിന്ന് സംഖ്യാ ഇതര പ്രതീകങ്ങൾ നീക്കം ചെയ്യുക, B2 ലെ ഫോർമുല ഇതാണ്:

=RemoveText(A2)

അത് കോളത്തിന്റെ താഴേക്ക് പകർത്തുക, നിങ്ങൾക്ക് ഈ ഫലം ലഭിക്കും:

ശ്രദ്ധിക്കുക. നേറ്റീവ് ഫോർമുലകളും ഇഷ്‌ടാനുസൃത ഫംഗ്‌ഷനുകളും ഒരു സംഖ്യാ സ്ട്രിംഗ് ഔട്ട്‌പുട്ട് ചെയ്യുന്നു. അതിനെ ഒരു സംഖ്യയാക്കാൻ, ഫലത്തെ 1 കൊണ്ട് ഗുണിക്കുക, അല്ലെങ്കിൽ പൂജ്യം ചേർക്കുക അല്ലെങ്കിൽ VALUE ഫംഗ്‌ഷനിൽ ഫോർമുല പൊതിയുക. ഉദാഹരണത്തിന്:

=RemoveText(A2) + 0

=VALUE(RemoveText(A2))

Excel-ലെ ടെക്സ്റ്റ് സ്‌ട്രിംഗിൽ നിന്ന് നമ്പറുകൾ എങ്ങനെ നീക്കംചെയ്യാം

എക്‌സൽ 365, എക്‌സൽ 2021, എക്‌സൽ എന്നിവയിൽ പരിഹാരം പ്രവർത്തിക്കുന്നു 2019

ഒരു ആൽഫാന്യൂമെറിക് സ്‌ട്രിംഗിൽ നിന്ന് അക്കങ്ങൾ നീക്കം ചെയ്യുന്നതിനുള്ള സൂത്രവാക്യങ്ങൾ മുമ്പത്തെ ഉദാഹരണത്തിൽ ചർച്ച ചെയ്‌തതിന് സമാനമാണ്.

Excel 365 - 2019:

TEXTJOIN(" ", TRUE, IF(ISERR(MID( സെൽ , ROW(INDIRECT("1:"&LEN( സെൽ ) )), 1) *1), MID( സെൽ , ROW(INDIRECT("1:"&LEN( ) cell ))), 1), ""))

Excel 2019-ൽ, Ctrl + Shift + Enter കീകൾ ഒരുമിച്ച് അമർത്തി അതിനെ ഒരു അറേ ഫോർമുല ആക്കാൻ ഓർമ്മിക്കുക.

0>Excel 365-നും 2021-നും: TEXTJOIN("", TRUE, IF(ISERROR(MID( cell ), SEQUENCE(LEN( cell 1) *1), MID ( സെൽ , SEQUENCE(LEN( സെൽ )), 1), ""))

ഉദാഹരണത്തിന്, A2-ലെ ഒരു സ്‌ട്രിംഗിൽ നിന്ന് നമ്പറുകൾ സ്ട്രിപ്പ് ചെയ്യുന്നതിന്, ഫോർമുല ഇതാണ്:

=TEXTJOIN("", TRUE, IF(ISERR(MID(A2, ROW(INDIRECT( "1:"&LEN(A2) )), 1) *1), MID(A2, ROW(INDIRECT("1:"&LEN(A2))), 1), ""))

അല്ലെങ്കിൽ

=TEXTJOIN("", TRUE, IF(ISERROR(MID(A2, SEQUENCE(LEN(A2)), 1) *1), MID(A2, SEQUENCE(LEN(A2)), 1), ""))

ഫലമായി, ഒരു സെല്ലിൽ നിന്ന് എല്ലാ നമ്പറുകളും നീക്കം ചെയ്യുകയും ടെക്‌സ്‌റ്റ് പ്രതീകങ്ങൾ സൂക്ഷിക്കുകയും ചെയ്യുന്നു:

മുകളിലുള്ള സ്‌ക്രീൻഷോട്ടിൽ കാണിച്ചിരിക്കുന്നതുപോലെ, ഫോർമുല ഒരു സ്‌ട്രിംഗിലെ ഏത് സ്ഥാനത്തുനിന്നും സംഖ്യാ പ്രതീകങ്ങളെ സ്ട്രിപ്പ് ചെയ്യുന്നു: തുടക്കത്തിലും അവസാനത്തിലും മധ്യത്തിലും. എന്നിരുന്നാലും, ഒരു മുന്നറിയിപ്പ് ഉണ്ട്: ഒരു സ്ട്രിംഗ് ആണെങ്കിൽ ഒരു സംഖ്യയെ തുടർന്ന് ഒരു സ്‌പെയ്‌സിൽ ആരംഭിക്കുന്നു , ആ സ്‌പെയ്‌സ് നിലനിർത്തുന്നു, ഇത് മുൻനിര സ്‌പെയ്‌സുകളുടെ പ്രശ്‌നം സൃഷ്‌ടിക്കുന്നു (B2 പോലെ).

ടെക്‌സ്‌റ്റിന് മുമ്പുള്ള അധിക സ്‌പെയ്‌സ് ഒഴിവാക്കാൻ , TRIM ഫംഗ്‌ഷനിലെ ഫോർമുല ഇതുപോലെ പൊതിയുക:

=TRIM(TEXTJOIN("", TRUE, IF(ISERROR(MID(A2, SEQUENCE(LEN(A2)), 1) *1), MID(A2, SEQUENCE(LEN(A2)), 1), "")))

ഇപ്പോൾ, നിങ്ങളുടെ ഫലങ്ങൾ തികച്ചും തികഞ്ഞതാണ്!

ഈ ഫോർമുല എങ്ങനെ പ്രവർത്തിക്കുന്നു:

സാരാംശത്തിൽ, ഫോർമുല മുമ്പത്തെ ഉദാഹരണത്തിൽ വിശദീകരിച്ചതുപോലെ തന്നെ പ്രവർത്തിക്കുന്നു. വ്യത്യാസം എന്തെന്നാൽ, TEXTJOIN ഫംഗ്‌ഷനിലേക്ക് നൽകിയിരിക്കുന്ന അവസാന അറേയിൽ നിന്ന്, ടെക്‌സ്‌റ്റല്ല, അക്കങ്ങളാണ് നിങ്ങൾ നീക്കം ചെയ്യേണ്ടത്. ഇത് ചെയ്യുന്നതിന്, ഞങ്ങൾ IF, ISERROR ഫംഗ്‌ഷനുകളുടെ സംയോജനമാണ് ഉപയോഗിക്കുന്നത്.

നിങ്ങൾ ഓർക്കുന്നത് പോലെ,MID(...)+0 സംഖ്യകളുടെ ഒരു നിരയും #VALUE-ഉം സൃഷ്ടിക്കുന്നു! സമാന സ്ഥാനങ്ങളിൽ ടെക്‌സ്റ്റ് പ്രതീകങ്ങളെ പ്രതിനിധീകരിക്കുന്ന പിശകുകൾ:

{2;1;0;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!}

ISERROR ഫംഗ്‌ഷൻ പിശകുകൾ പിടിക്കുകയും ഫലമായുണ്ടാകുന്ന ബൂളിയൻ മൂല്യങ്ങളുടെ ശ്രേണിയെ IF:

{FALSE;FALSE;FALSE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE}

IF ഫംഗ്‌ഷൻ TRUE (ഒരു പിശക്) കാണുമ്പോൾ, അത് മറ്റൊരു MID ഫംഗ്‌ഷന്റെ സഹായത്തോടെ പ്രോസസ്സ് ചെയ്‌ത അറേയിലേക്ക് അനുബന്ധ ടെക്‌സ്‌റ്റ് പ്രതീകം ചേർക്കുന്നു. IF ഫംഗ്‌ഷൻ FALSE (ഒരു നമ്പർ) കാണുമ്പോൾ, അത് ഒരു ശൂന്യമായ സ്‌ട്രിംഗ് ഉപയോഗിച്ച് മാറ്റിസ്ഥാപിക്കുന്നു:

{"";"";"";" ";"S";"u";"n";"s";"e";"t";" ";"R";"o";"a";"d"}

ഈ അന്തിമ അറേ TEXTJOIN-ലേക്ക് കൈമാറുന്നു, അതിനാൽ ഇത് ടെക്‌സ്‌റ്റ് പ്രതീകങ്ങളെ സംയോജിപ്പിച്ച് ഔട്ട്‌പുട്ട് ചെയ്യുന്നു ഫലം.

ടെക്‌സ്‌റ്റിൽ നിന്ന് നമ്പറുകൾ നീക്കം ചെയ്യുന്നതിനുള്ള ഇഷ്‌ടാനുസൃത പ്രവർത്തനം

എല്ലാ എക്‌സൽ പതിപ്പുകൾക്കും പരിഹാരം പ്രവർത്തിക്കുന്നു

ശക്തമായ ഫോർമുല സൂക്ഷിക്കണമെന്ന് ഓർമ്മിക്കുക ലളിതമായി, ഏതെങ്കിലും സംഖ്യാ പ്രതീകം നീക്കം ചെയ്യാൻ ഞാൻ ഉപയോക്തൃ-നിർവചിച്ച ഫംഗ്‌ഷന്റെ (UDF) കോഡ് പങ്കിടും.

VBA കോഡ് 1:

ഫംഗ്‌ഷൻ RemoveNumbers(str As String ) മങ്ങുക sRes As String sRes = "" for i = 1 To Len(str) False = IsNumeric(Mid(str, i, 1)) പിന്നെ sRes = sRes & മിഡ്(str, i, 1) അടുത്തതാണെങ്കിൽ അവസാനിപ്പിക്കുക i RemoveNumbers = sRes എൻഡ് ഫംഗ്‌ഷൻ

VBA കോഡ് 2:

ഫംഗ്‌ഷൻ RemoveNumbers(string ആയി ) CreateObject ഉള്ള സ്‌ട്രിംഗായി ( "VBScript.RegExp" ) .Global = True .Pattern = "[0-9]" RemoveNumbers2 = .Replace(str, "" ) End With End Function

RemoveText ഫംഗ്‌ഷന്റെ കാര്യത്തിലെന്നപോലെ, രണ്ടാമത്തെ കോഡ് ഉപയോഗിക്കുന്നതാണ് നല്ലത്. വലിയപ്രകടനം ഒപ്റ്റിമൈസ് ചെയ്യുന്നതിനുള്ള വർക്ക്ഷീറ്റുകൾ.

നിങ്ങളുടെ വർക്ക്ബുക്കിലേക്ക് കോഡ് ചേർത്തുകഴിഞ്ഞാൽ, ഈ ഇഷ്‌ടാനുസൃത ഫംഗ്‌ഷൻ ഉപയോഗിച്ച് നിങ്ങൾക്ക് ഒരു സെല്ലിൽ നിന്ന് എല്ലാ സംഖ്യാ പ്രതീകങ്ങളും നീക്കംചെയ്യാം:

RemoveNumbers(string)

ഞങ്ങളുടെ കാര്യത്തിൽ, B2-ലെ ഫോർമുല ഇതാണ്:

=RemoveNumbers(A2)

ഏതെങ്കിലും മുൻനിര സ്‌പെയ്‌സുകൾ ട്രിം ചെയ്യാൻ, നിങ്ങൾ ഒരു നേറ്റീവ് ഫോർമുല പോലെ TRIM-നുള്ളിൽ കസ്റ്റം ഫംഗ്‌ഷൻ നെസ്റ്റ് ചെയ്യുക:

=TRIM(RemoveNumbers(A2))

നമ്പറുകളും ടെക്‌സ്‌റ്റും വെവ്വേറെ കോളങ്ങളായി വിഭജിക്കുക

നിങ്ങൾക്ക് ടെക്‌സ്‌റ്റും അക്കങ്ങളും രണ്ട് കോളങ്ങളായി വേർതിരിക്കണമെങ്കിൽ, ഒരൊറ്റ ഫോർമുല ഉപയോഗിച്ച് ജോലി ചെയ്യുന്നത് നന്നായിരിക്കും , സമ്മതിക്കണോ? ഇതിനായി, ഞങ്ങൾ RemoveText , RemoveNumbers ഫംഗ്‌ഷനുകളുടെ കോഡ് SplitTextNumbers എന്ന പേരിൽ ഒരു ഫംഗ്‌ഷനിലേക്ക് ലയിപ്പിക്കുക, അല്ലെങ്കിൽ ലളിതമായി Split , അല്ലെങ്കിൽ നിങ്ങൾക്ക് ഇഷ്ടമുള്ളതെന്തും :)

VBA കോഡ് 1:

ഫംഗ്‌ഷൻ സ്പ്ലിറ്റ്‌ടെക്‌സ്‌റ്റ് നമ്പറുകൾ(സ്‌ട്രിംഗ് ആയി , ബൂളിയൻ ആയി _remove_text ) സ്‌ട്രിംഗ് ഡിം ആയി sNum, sText, sChar സ്‌ട്രിംഗായി sCurChar = sNum = sText = "" എന്നതിനായി i = 1 മുതൽ Len(str) sCurChar = Mid(str, i, 1) True = IsNumeric(sCurChar) ആണെങ്കിൽ sNum = sNum & sCurChar Else sText = sText & sCurChar അവസാനിച്ചാൽ അടുത്തത് ശരിയാണെങ്കിൽ = is_remove_text പിന്നെ SplitTextNumbers = sNum Else SplitTextNumbers = sText End ഫംഗ്‌ഷൻ അവസാനിച്ചാൽ

VBA കോഡ് 2:

ഫംഗ്ഷൻ SplitTextNumbers(സ്‌ട്രിംഗ്_ടെക്‌സ്‌റ്റായി , String_text ആയി) CreateObject ഉപയോഗിച്ച് ( "VBScript.RegExp" ) .Global = True എങ്കിൽ True = is_remove_text പിന്നെ .പാറ്റേൺ = "[^0-9]" വേറെ.Pattern = "[0-9]" അവസാനം SplitTextNumbers = .Replace(str, "" ) End Function ഉപയോഗിച്ച് അവസാനിപ്പിക്കുക

ഞങ്ങളുടെ പുതിയ കസ്റ്റം ഫംഗ്‌ഷന് രണ്ട് ആർഗ്യുമെന്റുകൾ ആവശ്യമാണ്:

SplitTextNumbers(string, is_remove_text)

എവിടെ is_remove_text എന്നത് ഏത് പ്രതീകങ്ങളാണ് സ്ട്രിപ്പ് ചെയ്യേണ്ടതെന്ന് സൂചിപ്പിക്കുന്ന ഒരു ബൂളിയൻ മൂല്യമാണ്:

• TRUE അല്ലെങ്കിൽ 1 - ടെക്‌സ്‌റ്റ് നീക്കം ചെയ്‌ത് നമ്പറുകൾ സൂക്ഷിക്കുക
• FALSE അല്ലെങ്കിൽ 0 - നമ്പറുകൾ നീക്കം ചെയ്‌ത് ടെക്‌സ്‌റ്റ് സൂക്ഷിക്കുക

ഞങ്ങളുടെ സാമ്പിൾ ഡാറ്റാസെറ്റിനായി, ഫോർമുലകൾ ഈ ഫോം എടുക്കുന്നു:

നോൺ-സംഖ്യാ പ്രതീകങ്ങൾ നീക്കംചെയ്യാൻ:

=SplitTextNumbers(A2, TRUE)

സംഖ്യാ പ്രതീകങ്ങൾ ഇല്ലാതാക്കാൻ :

=SplitTextNumbers(A2, FALSE)

നുറുങ്ങ്. ലീഡിംഗ് സ്‌പെയ്‌സുകളുടെ പ്രശ്‌നം ഒഴിവാക്കാൻ, TRIM ഫംഗ്‌ഷനിൽ നമ്പറുകൾ നീക്കം ചെയ്യുന്ന ഫോർമുല എപ്പോഴും പൊതിയാൻ ഞാൻ ശുപാർശ ചെയ്യുന്നു:

=TRIM(SplitTextNumbers(A2, FALSE))

നമ്പറുകൾ അല്ലെങ്കിൽ ടെക്‌സ്‌റ്റ് നീക്കംചെയ്യാനുള്ള പ്രത്യേക ഉപകരണം

ഇത് ചെയ്യുന്നവർക്ക് അനാവശ്യമായി കാര്യങ്ങൾ സങ്കീർണ്ണമാക്കുന്നത് ഇഷ്ടമല്ല, Excel-ൽ ടെക്‌സ്‌റ്റോ നമ്പറുകളോ നീക്കം ചെയ്യുന്നതിനുള്ള ഞങ്ങളുടെ സ്വന്തം വഴി ഞാൻ കാണിച്ചുതരാം.

ഞങ്ങളുടെ അൾട്ടിമേറ്റ് സ്യൂട്ട് നിങ്ങളുടെ Excel റിബണിൽ ചേർത്തിട്ടുണ്ടെന്ന് കരുതുക, ഇതാണ് നിങ്ങൾ ചെയ്യുന്നത്:

1. Ablebits Data ടാബിൽ, Text ഗ്രൂപ്പിൽ, നീക്കംചെയ്യുക > അക്ഷരങ്ങൾ നീക്കം ചെയ്യുക .
<21

ആഡ്-ഇന്നിന്റെ പാളിയിൽ, ഉറവിട ശ്രേണി തിരഞ്ഞെടുക്കുക, കഥാപാത്രങ്ങൾ നീക്കം ചെയ്യുക ഓപ്ഷൻ തിരഞ്ഞെടുക്കുക, കൂടാതെ ടെക്‌സ്‌റ്റ് <1 തിരഞ്ഞെടുക്കുക ഡ്രോപ്പ്-ഡൗൺ ലിസ്റ്റിൽ>അക്ഷരങ്ങൾ അല്ലെങ്കിൽ സംഖ്യാ കഥാപാത്രങ്ങൾ .

നീക്കംചെയ്യുക അമർത്തി ഫലം ആസ്വദിക്കൂ :)

നുറുങ്ങ്. ഫലങ്ങളിൽ ചില മുൻനിര സ്‌പെയ്‌സുകൾ അടങ്ങിയിട്ടുണ്ടെങ്കിൽ, ട്രിം സ്‌പെയ്‌സുകൾഉപകരണം ഉടൻ തന്നെ അവയെ ഇല്ലാതാക്കും.

അങ്ങനെയാണ് Excel-ലെ ഒരു സ്ട്രിംഗിൽ നിന്ന് ടെക്‌സ്‌റ്റോ സംഖ്യാ പ്രതീകങ്ങളോ നീക്കം ചെയ്യുന്നത്. വായിച്ചതിന് നന്ദി, അടുത്ത ആഴ്‌ച ഞങ്ങളുടെ ബ്ലോഗിൽ നിങ്ങളെ കാണുമെന്ന് പ്രതീക്ഷിക്കുന്നു!

ലഭ്യമായ ഡൗൺലോഡുകൾ

Excel-ൽ ടെക്‌സ്‌റ്റോ നമ്പറുകളോ നീക്കംചെയ്യുക - ഉദാഹരണങ്ങൾ (.xlsm ഫയൽ)

അൾട്ടിമേറ്റ് സ്യൂട്ട് - ട്രയൽ പതിപ്പ് (.exe ഫയൽ)