Funkce VBA InStr

Ve VBA máme funkci nazvanou InStr Function, která se používá k vrácení pozice prvního výskytu podřetězce v řetězci. Což znamená například jméno s názvem „Jhon“ a v řetězci musíme najít výskyt pozice H abecedy. To je to, k čemu se funkce používá.

Vzorec pro funkci InStr v aplikaci Excel VBA

Funkce Excel VBA InStr má následující syntaxi:

V syntaxi Spuštění a porovnání jsou volitelné, zatímco jsou vyžadovány hodnoty řetězců a podřetězců. Řetězec je řetězec, ve kterém chceme najít náš podřetězec a podřetězec je hodnota, kterou je třeba v řetězci nalézt. Předpokládejme, že kdybychom museli použít výše uvedenou syntaxi na našem příkladu Jhon nad kódem VBA, bylo by to níže,

Instr (“Jhon”, “H”) a výsledek by byl 2, protože pozice abecedy H je 2 v řetězci.

Nyní se přesuneme k volitelným částem syntaxe, které jsou, start a porovnání. Začátek je pozice řetězce, od kterého chceme začít hledat, zatímco srovnání je tří typů,

  1. VbUseCompareOption: (-1) Slouží k porovnání možností.
  2. VbBinaryCompare: (0) Používá se pro binární porovnání.
  3. VbTextCompare: (1) Používá se k porovnání textu.

K uložení hodnoty výsledku však potřebujeme proměnnou. Protože hodnota je celé číslo, tak definovaná proměnná by měla být také celé číslo. Nyní, když jsme vypočítali hodnotu, musíme také zobrazit výsledek, použijeme funkci msgbox k zobrazení výsledku.

Jak používat funkci Excel VBA InStr?

Naučíme se, jak používat funkci VBA InStr Excel s několika příklady.

Tuto šablonu aplikace VBA InStr Excel si můžete stáhnout zde - VBA InStr Excel Template

Funkce VBA InStr - Příklad č. 1

Ve výše uvedeném vysvětlení jsem použil slovo Jhon jako řetězec a chtěl jsem najít polohu H v řetězci. Napíšu stejný kód ve VBA a pomocí funkce Instr zjistím polohu J v řetězci.

Chcete-li použít funkci InStr ve VBA, postupujte podle následujících kroků.

Krok 1: Na kartě Vývojář klikněte na Visual Basic a otevřete Editor VB.

Krok 2: Jakmile je modul otevřen, deklarujte subfunkci a začněte psát kód.

Kód:

 Porovnat () Konec 

Krok 3: Nyní je funkce deklarována, Musíme deklarovat proměnnou pro uložení pozice podřetězce.

Kód:

 Porovnat () Dim Pos jako celé číslo Sub Sub 

Krok 4: Nyní napíšeme funkci InStr, abychom zjistili polohu našeho podřetězce.

Kód:

 Porovnat () Dim Pos As Integer Pos = InStr ("Jhon", "J") End Sub 

Krok 5: Chcete-li vrátit pozici podřetězce jako hodnotu, použijeme funkci MsgBox a uzavřete podfunkci.

Kód:

 Dílčí porovnání () Dim Pos As Integer Pos = InStr ("Jhon", "J") MsgBox Pos End Sub Sub 

Krok 6: Pokud spustíme kód, ukazuje polohu abecedy J v řetězci.

Krok 7: Pokud změníme podřetězec, abychom ověřili, že kód běží správně, najdeme v řetězci abecedu n.

Kód:

 Dílčí porovnání () Dim Pos As Integer Pos = InStr ("Jhon", "n") MsgBox Pos End Sub Sub 

Krok 8: Nyní, když spustíme kód, můžeme v řetězci vidět polohu abecedy n.

Funkce VBA InStr - Příklad č. 2

Nyní jsme viděli, co požadované argumenty funkce dělají, nyní používáme volitelné. Řetězec je „Jsem dobrý chlapec, ale ne dobrý běžec“. Najdeme podřetězec „Good“ z řetězce, ale ignorujeme první Good z věty.

Chcete-li použít funkci InStr ve VBA, postupujte podle následujících kroků.

Krok 1: Otevřete editor VB z karty vývojářů kliknutím na Visual Basic.

Krok 2: Začněte deklarováním dílčí funkce.

Kód:

 Porovnat díl1 () Konec 

Krok 3: Nyní deklarujte proměnnou pro uložení pozice podřetězce.

Kód:

 Porovnat díl 1 () Dim Pos1 jako celé číslo dílčího čísla Sub 

Krok 4: Nyní použijeme funkci InStr k nalezení pozice řetězce.

Kód:

 Srovnávací1 

Krok 5: Nyní pomocí funkce Msgbox vrátíme hodnotu řetězce.

Kód:

 Srovnávací1 

Krok 6: Nyní, když spustíme kód, můžeme získat pozici podřetězce.

Vysvětlení funkce přístroje Excel VBA

Funkce InStr ve VBA se používá k vrácení pozice hodnoty podřetězce v řetězci. Co se stane, pokud není hodnota nalezena? Pokud není hodnota nalezena v řetězci, zobrazený výsledek je nula.

Jedna věc, kterou bychom si měli vždy pamatovat, je ve funkci nástroje rozlišována velká a malá písmena. Abychom to dokázali, přesuneme se do příkladu 1, kde jsme použili funkci instrument k hledání abecedy.

Co se stane, když je podřetězec „N“ místo „n“? pojďme to zjistit. Změnil jsem případ abecedy v řetězci.

Nyní, když spustím kód, dostanu výsledek, jak je ukázáno níže.

To dokazuje, že funkce nástroje rozlišuje velká a malá písmena.

Co si pamatovat

  • Dvě povinná pole jsou String a Substring.
  • Funkce nástroje rozlišuje velká a malá písmena.
  • Hodnota funkce InStr je celé číslo.

Doporučené články

Toto byl průvodce funkcí VBA InStr. Zde jsme diskutovali o tom, jak používat Excel VBA InStr Function spolu s praktickými příklady a stahovatelnou šablonou Excel. Můžete si také prohlédnout naše další doporučené články -

  1. Funkce VBA VLOOKUP
  2. Excel SWITCH Funkce
  3. Kompletní průvodce VBA při chybě
  4. Použití posuvníku v Excelu

Kategorie: