Funkcia VBA InStr

Vo VBA máme funkciu s názvom InStr Function, ktorá sa používa na vrátenie polohy prvého výskytu podreťazca v reťazci. Čo znamená napríklad názov s názvom „Jhon“ a v reťazci musíme nájsť výskyt polohy písmena H. Na to sa funkcia používa.

Vzorec pre funkciu InStr v programe Excel VBA

Funkcia Excel VBA InStr má nasledujúcu syntax:

V syntaxi sú začiatočné a porovnávacie údaje voliteľné, pričom sú potrebné hodnoty reťazca a podreťazcov. Reťazec je reťazec, v ktorom chceme nájsť podreťazec a podreťazec je hodnota, ktorá sa musí v reťazci nájsť. Predpokladajme, že keby sme museli použiť uvedenú syntax na našom príklade Jhon nad kódom VBA, bolo by to nižšie,

Instr („Jhon“, „H“) a výsledok by bol 2, pretože pozícia abecedy H je 2 v reťazci.

Teraz sa presunieme k voliteľným častiam syntaxe, ktoré sú, štart a porovnanie. Začiatok je pozícia reťazca, z ktorého chceme začať hľadať, zatiaľ čo porovnanie je troch typov,

  1. VbUseCompareOption: (-1) Používa sa na porovnanie možností.
  2. VbBinaryCompare: (0) Používa sa na porovnávanie binárnych údajov.
  3. VbTextCompare: (1) Používa sa na porovnávanie textu.

Na uloženie hodnoty výsledku však potrebujeme premennú. Pretože hodnota je celé číslo, tak definovaná premenná by mala byť tiež celé číslo. Teraz, keď sme vypočítali hodnotu, potrebujeme tiež zobraziť výsledok, na zobrazenie výsledku použijeme funkciu msgbox.

Ako používať funkciu Excel VBA InStr?

Naučíme sa, ako používať funkciu VBA InStr Excel s niekoľkými príkladmi.

Túto šablónu VBA InStr Excel si môžete stiahnuť tu - šablónu VBA InStr Excel

Funkcia VBA InStr - Príklad č. 1

Vo vyššie uvedenom vysvetlení som použil slovo Jhon ako reťazec a chcel som nájsť polohu H v reťazci. Rovnaký kód napíšem vo VBA a pomocou funkcie Instr nájdem pozíciu J v reťazci.

Ak chcete použiť funkciu InStr vo VBA, postupujte podľa nasledujúcich krokov.

Krok 1: Na karte Developer kliknite na Visual Basic a otvorte editor VB.

Krok 2: Po otvorení modulu deklarujte subfunkciu, aby ste mohli začať písať kód.

kód:

 Porovnať () Koniec

Krok 3: Teraz je funkcia deklarovaná, Musíme deklarovať premennú na uloženie pozície podreťazca.

kód:

 Porovnať () Dim Pos As Integer End Sub

Krok 4: Teraz napíšeme funkciu InStr, aby sme zistili polohu nášho podreťazca.

kód:

 Porovnať () Dim Pos ako celé číslo Pos = InStr ("Jhon", "J") Koniec Sub

Krok 5: Na vrátenie polohy podreťazca ako hodnoty použijeme funkciu MsgBox a zatvoríme subfunkciu.

kód:

 Sub Porovnať () Dim Pos As Integer Pos = InStr ("Jhon", "J") MsgBox Pos End Sub Sub

Krok 6: Ak spustíme kód, zobrazuje pozíciu abecedy J v reťazci.

Krok 7: Ak zmeníme podreťazec, aby sme skontrolovali, či kód funguje správne, nájdeme v reťazci abecedu n.

kód:

 Sub Porovnať () Dim Pos As Integer Pos = InStr ("Jhon", "n") MsgBox Pos End Sub Sub

Krok 8: Teraz, keď spustíme kód, vidíme v reťazci pozíciu abecedy n.

Funkcia VBA InStr - Príklad č. 2

Teraz sme videli, čo požadované argumenty funkcie robia, teraz používajme voliteľné argumenty. String je „Som dobrý chlapec, ale nie dobrý bežec“. Nájdeme podreťazec „dobrý“ zo reťazca, ale prvý dobrý z vety ignorujeme.

Ak chcete použiť funkciu InStr vo VBA, postupujte podľa nasledujúcich krokov.

Krok 1: Otvorte editor VB z karty vývojárov kliknutím na Visual Basic.

Krok 2: Začnite vyhlásením podfunkcie.

kód:

 Porovnanie pod1 () Koniec pod

Krok 3: Teraz deklarujte premennú na uloženie polohy podreťazca.

kód:

 Porovnanie sub1 () Dim Pos1 ako celé číslo Koniec Sub

Krok 4: Teraz použijeme funkciu InStr na nájdenie polohy reťazca.

kód:

 Sub Porovnať1 () Dim Pos1 Ako celé číslo Pos = InStr (12, „Som dobrý chlapec, ale robím dobrým bežec“, „dobrý“, vbBinaryCompare) End Sub

Krok 5: Teraz použijeme funkciu Msgbox na vrátenie hodnoty reťazca.

kód:

 Porovnanie pod úrovňou1 () Dim Pos1 ako celé číslo Pos = InStr (12, „Som dobrý chlapec, ale robím dobrý bežec“, „dobrý“, vbBinaryCompare) MsgBox Pos End Sub Sub

Krok 6: Teraz, keď spustíme kód, môžeme získať pozíciu podreťazca.

Vysvetlenie funkcie nástroja Excel VBA

Funkcia InStr vo VBA sa používa na vrátenie polohy hodnoty podreťazca v reťazci. Čo sa stane, ak sa nenájde hodnota? Ak sa hodnota v reťazci nenájde, zobrazený výsledok je nula.

Jedna vec, ktorú by sme si mali vždy zapamätať, je pri funkciách Instrument rozlišovaná veľkosť písmen. Aby sme to dokázali, presunieme sa do príkladu 1, kde sme použili funkciu nástroja na vyhľadávanie abecedy.

Čo sa stane, ak je podreťazec „N“ namiesto „n“? zistime to. Zmenil som prípad abecedy v reťazci.

Teraz, keď spustím kód, dostanem výsledok, ako je uvedené nižšie.

To dokazuje, že funkcia nástroja rozlišuje veľké a malé písmená.

Čo je potrebné pamätať

  • Dve požadované polia sú String a Substring.
  • Funkcia nástroja rozlišuje veľké a malé písmená.
  • Hodnota funkcie InStr je celé číslo.

Odporúčané články

Toto bol sprievodca funkciou VBA InStr. Diskutovali sme o tom, ako používať funkciu Excel VBA InStr spolu s praktickými príkladmi a šablónou Excel na stiahnutie. Môžete si tiež prečítať naše ďalšie navrhované články -

  1. Funkcia VBA VLOOKUP
  2. Excel SWITCH Funkcia
  3. Kompletný sprievodca chybou VBA
  4. Použitie posúvača v Exceli

Kategórie:

VBA