Enhavtabelo
Se vi serĉas iujn el la plej facilaj manieroj trovi subŝnurojn per VBA, tiam vi estas en la ĝusta loko. Post trarigardi ĉi tiun artikolon, vi povos trovi la pozicion de subĉeno aŭ ĉerpi datumojn per ĉi tiu subĉeno aŭ ŝanĝi la formaton de subĉeno facile. Ni eniru la artikolon.
Elŝutu Laborlibron
Ekzempla enhavo
9 Manieroj Trovi Subŝnurojn Uzante VBA
Jen, mi havas la jenajn datumtabelo per kiu mi montros la manierojn trovi subŝnuron en ĉeno uzante VBA. Mi ankaŭ provos montri la manierojn trovi subĉenon en hazarda ĉeno.
Mi plenumis ĉi tiun taskon per Microsoft Excel 365 versio, vi povas uzi ajnan alian version laŭ via oportuno.
 Dim cell As Range For Each cell In Range()
Metodo-1: Trovi subŝnuron en ĉeno uzante VBA
Se vi volas trovi vian deziratan subĉenon en ĉeno uzante VBA, vi povas uzi la InStr-funkcio en la VBA-kodo.
Paŝo-01 :
➤Iru al Programisto Tab>> Visual Basic Opcio
Tiam, la Visual Basic Editor malfermiĝos.
➤Iru al Enmeti Tab>> Modulo Opcio
Post tio, Modulo estos kreita.
Paŝo-02 :
➤Skribu la sekvan kodon
3015
Ĉi tie, InStr(1, “ Mi pensas do mi estas”, “pensas”) revenos la pozicion de la subĉeno de ĉeno. 1 estas lakomenca pozicio, " Mi pensas do mi estas" estas la ĉeno kie vi trovos vian deziratan subĉenon, kaj "pensu" estas la subĉeno, kiun vi volas trovi. Ĝi defaŭlte distingas minusklojn, do atentu la minusklojn de via subĉeno, kiun vi volas serĉi.
➤Premu F5
Rezulto :
Post tio, vi ricevos la jenan Mesaĝkeston enhavantan la pozicion de la “pensu” subĉeno.
Metodo-2: Trovi majusksentemajn subŝnurojn en ĉeno
Se vi volas trovi vian deziratan subĉenon en ĉeno sendepende de la kazo uzante VBA, tiam sekvu ĉi tion metodo.
Paŝo-01 :
➤Sekvu Paŝo-01 de Metodo-1
7587
Ĉi tie, vbTextCompare estas uzata por trovi kaz-nesensivan substringon.
➤Press F5
Rezulto :
Tiam, vi ricevos la jenan Mesaĝkeston enhavantan la pozicion de la “pensu” subĉeno.
Vi povas fari la samon uzante la jenan kodon.
2446
Ĉi tie, Opcio Komparu Tekston trovos majuskle-nedistintan subĉenon.
➤Premu F5
Rezulto :
Poste, vi vi Mi ricevos la jenan Mesaĝkeston enhavantan la pozicion de la “pensu” subĉeno.
Metodo-3: Uzado de la funkcio InstrRev en VBA
Ĉi tie, mi montros la manieron trovi subĉenon de la fino de aĉeno.
Paŝo-01 :
➤Sekvu Paŝo-01 de Metodo-1
3054
InStrRev trovos la subĉenon de la dekstra flanko anstataŭ la maldekstra flanko.
➤Premu F5
Rezulto :
Tiam, vi ricevos la jenan Mesaĝkeston enhavantan la pozicion de la dua “I” subĉeno de la dekstra flanko.
Metodo-4: Trovi la pozicion de Subŝnuro en Ŝnuro en Gamo de Datumoj
Se vi volas trovi la specialan signon “@” en la Retpoŝto Id , tiam sekvu ĉi tiun metodon. Mi aldonis ĉi tie la Pozicio-kolumnon por ĉi tiu celo.
Paŝo-01 :
➤Sekvu Paŝo-01 de Metodo-1
9737
Ĝi kreos funkcion nomitan FindSubstring (vi povas uzi ajnan alian nomon)
valoro estas la ĉela referenco kiu enhavas la ĉenon kaj ĝi estas deklarita kiel Gamo .
Paŝo -02 :
➤Elektu la eligon Ĉelo E5
➤Tajpu la sekvan funkcion (kreitan de VBA )
=FindSubstring(D5)
D5 estas la ĉelo kiu enhavas la ĉenon.
/w0qv7gk6ad-30.png"/>
Paŝo-02 :
➤Elektu la Rezultan kolumnon
➤Iru al Programisto Tab>> Makrooj Opcio
Tiam, Makroo aperos asistanto.
➤Elektu Grada subŝnuro (la VBA-kodnomo) kaj poste Ruli .
Rezulto :
Post tio, la notoj en la Rezulto Kolumno estos grasigitaj.
Praktika Sekcio
Por fari ekzercon per vi mem ni disponigis Praktikan sekcion kiel sube en folio nomita Praktiko . Bonvolu fari ĝin memstare.
Konkludo
En ĉi tiu artikolo, mi provis kovri la plej facilajn manierojn trovi subŝnurojn per VBA en Excel efike. Espereble vi trovos ĝin utila. Se vi havas sugestojn aŭ demandojn, bonvolu dividi ilin kun ni.
