Paprasta Instr funkcija | Pradinė padėtis | Nulis | Instr ir If | Skiriant didžiąsias ir mažąsias raides
Naudoti Instr į Excel VBA norėdami rasti antrinės eilutės padėtį eilutėje. Instr funkcija yra gana universali.
Įdėkite komandų mygtuką į savo darbalapį ir pridėkite žemiau esančias kodo eilutes. Norėdami vykdyti kodo eilutes, spustelėkite komandų mygtuką lape.
Paprasta „Instr“ funkcija
Pagal numatytuosius nustatymus funkcija „Instr“ pradeda ieškoti eilutės pradžioje (1 pozicija).
Kodas:
Blyški būsena kaip eilutė
valstija = "Virdžinija"
„MsgBox InStr“ (būsena, „džinas“)
Rezultatas:
Pastaba: 4 pozicijoje rasta eilutė „gin“.
Pradinė padėtis
Žemiau antroji „Instr“ funkcija pradeda ieškoti 7 pozicijoje.
Kodas:
Blyški būsena kaip eilutė
valstija = "Pietų Karolina"
„MsgBox InStr“ (būsena, „o“)
„MsgBox InStr“ (7, būsena, „o“)
Rezultatas:
Paaiškinimas: pirmoji „Instr“ funkcija suranda eilutę „o“ 2 padėtyje. Antroji „Instr“ funkcija pradeda ieškoti 7 pozicijoje ir randa eilutę „o“ 10 pozicijoje.
Nulis
Funkcija „Instr“ grąžina 0, jei eilutė nerasta (svarbu, kaip matysime toliau).
Kodas:
Blyški būsena kaip eilutė
valstija = "Florida"
„MsgBox InStr“ (būsena „mes“)
Rezultatas:
Išvada: eilutė „mes“ nerasta.
Instr ir If
Sukurkime paprastą VBA programą, kuri naudoja Instr funkcija.
Kodas:
Blyški būsena kaip eilutė, antrinė eilutė kaip eilutė
state = Diapazonas ("A2"). Reikšmė
antrinė eilutė = diapazonas („B2“). Reikšmė
Jei InStr (būsena, antrinė eilutė)> 0 Tada
Diapazonas („C2“). Vertė = „Rasta“
Kitas
Diapazonas („C2“). Vertė = „Nerasta“
Pabaiga Jei
Rezultatas, kai lape spustelėsite komandų mygtuką:
Paaiškinimas: eilutė „outh“ rasta 2 pozicijoje. Funkcija „Instr“ grąžina 2. Dėl to „Excel VBA“ įterpia eilutę „Rasta“ į langelį C2.
Skiriant didžiąsias ir mažąsias raides
Pagal numatytuosius nustatymus funkcija „Instr“ atlieka didžiųjų ir mažųjų raidžių paiešką. Įveskite eilutę „dakota“ į langelį B2 ir spustelėkite lapo komandinį mygtuką.
Paaiškinimas: eilutė „dakota“ nerasta (pirmoji raidė neskiriama didžiosiomis raidėmis). Funkcija „Instr“ grąžina 0. Todėl „Excel VBA“ įterpia eilutę „Not Found“ į langelį C2.
Norėdami atlikti didžiųjų ir mažųjų raidžių paiešką, atnaujinkite kodą taip:
Blyški būsena kaip eilutė, antrinė eilutė kaip eilutė
state = Diapazonas ("A2"). Reikšmė
antrinė eilutė = diapazonas („B2“). Reikšmė
Jei InStr (1, būsena, antrinė eilutė, vbTextCompare)> 0 Tada
Diapazonas („C2“). Vertė = „Rasta“
Kitas
Diapazonas („C2“). Vertė = „Nerasta“
Pabaiga Jei
Rezultatas, kai lape spustelėsite komandų mygtuką:
Paaiškinimas: aukščiau parodyta funkcija „Instr“ turi 4 argumentus. Norėdami atlikti didžiųjų ir mažųjų raidžių paiešką, visada nurodykite pradžios poziciją (pirmasis argumentas) ir naudokite „vbTextCompare“ (ketvirtas argumentas).
