Dok radite u VBA -i, često morate uspoređivati nizove. Prema zadanim postavkama, VBA razlikuje velika i mala slova, pa ako usporedite dva ista teksta, a jedan je od velikih slova, a drugi od malih, VBA će ih smatrati različitim tekstovima. U ovom vodiču ćete vidjeti kako spriječiti VBA da razlikuje mala i velika slova.
Čini VBA velika slova osjetljivim
Kako bi VBA bila osjetljiva na velika i mala slova, morate staviti Opcija Usporedi tekst na početku modula. Prvo ćemo pogledati standardno ponašanje VBA -e bez ove opcije. Ovo je kod:
| 123456789 | Ako je Sheet1.Range ("A1"). Vrijednost = Sheet1.Range ("B1"). Vrijednost ZatimMsgBox "Dva teksta su ista"DrugoMsgBox "Dva teksta su različita"Završi ako |
U primjeru želimo usporediti nizove iz A1 i B1. Ako su nizovi jednaki, vratit ćemo okvir s porukom „Dva teksta su ista“. Ako nisu jednaki, vratit ćemo poruku „Dva su teksta različita.
Slika 1. Usporedba nizova bez mogućnosti usporedbe teksta
Kao što možete vidjeti na slici, oba teksta su ista, ali prvi je napisan velikim slovima, dok je drugi malim slovima. Zbog toga ih VBA smatra različitim i vratila je ovu poruku.
| 1234567891011 | Opcija Usporedi tekstJavni pod -slučajSensitiveTest ()Ako je Sheet1.Range ("A1"). Vrijednost = Sheet1.Range ("B1"). Vrijednost ZatimMsgBox "Dva teksta su ista"DrugoMsgBox "Dva teksta su različita"Završi akoKraj podm |
Sada ćemo dodati opciju Usporedi tekst na početku modula i vidjeti razliku. Evo koda. Kôd pokrećemo na istom primjeru:
Slika 2. Usporedba nizova s opcijom Usporedi tekst
Sada, kada je postavljena opcija Usporedi tekst, VBA postaje osjetljiv na velika i mala slova i smatra ta dva teksta istim.
Usporedba teksta
Ako se ne izjasnite Opcija Usporedi tekst, možete pretvoriti velika i mala slova kako biste napravili usporedbe koje ne razlikuju velika i mala slova. To je moguće pomoću UCase, LCase ili StrConv funkcije. Više o tome možete saznati ovdje: VBA Gornja, Donja i Pravilna futrola - Funkcije kućišta
