Case-funksjoner i VBA

Lær saks funksjonene VBA slik at du automatisk kan kapitalisere eller bruke små bokstaver på tekst i stedet for å kreve din programmets brukere å gjøre det manuelt. Lær "Velg case" statement å redusere rot i koden. Den kunnskapen du får av å lære disse uttalelsene kan hjelpe deg i å skrive egendefinerte tilfelle uttalelser, slik som de som ignorerer ord som "de" og "a" for å produsere korrekt kapitalisering til overskrifter i et dokument.

UCase

VBA UCase funksjonen konverterer teksten til sin eneste argument til alle store bokstaver. For eksempel, kjører utsagnet "debug.print UCase (" hallo ") vil resultere i" Hallo. "Du trenger ikke et program for å prøve dette, men du kan kjøre eksempel bare gitt fra VBA" Immediate "-vinduet. åpne VBA programmering miljøet ved å klikke på "Visual Basic" -knappen i kategorien Utvikler, og klikk deretter "Direkte" element under VBA Window-menyen. Skriv inn "debug" statement nettopp beskrev for å se "HELLO" tekst vises.

LCase

VBA er LCase funksjonen konverterer innspill tekst til små bokstaver, noe som er nyttig hvis du trenger å sammenligne tekststrenger med forskjellige saker. For eksempel, hvis programmet har en variabel "x" der verdien er "Hello" og en verdi "y" der verdien er "HELLO", så sammenligningen "x = y" vil returnere "False", fordi sakene ikke kamp. Sammenligningen "LCase (x) = LCase (y)" vil gi «True», men fordi uttalelsen endrer gjelder alle bokstavene til lavere.

Velg sak

Den Select sak funksjonen erstatter flere hvis deretter uttalelser. Den Select sak uttalelse tester en variabel, mens den enkelte sak uttalelser gir kanaler for programmet kjøres basert på testresultatene. Du kan ha så mange case uttalelser etter behov. Hvis du vil være sikker på velge sak uttalelse fanger alle mulige forhold, inkluderer en sak Else uttalelse før End Select uttalelse. Et eksempel illustrerer hvordan Select fungerer sak.

Public Sub testcase ()

Dim alder

alder = InputBox ( "Skriv inn alder.")

Velg Sak alder

Sak 13 til 19:

MsgBox "Du er en tenåring."

Sak 20 til 29:

MsgBox "Du er i tjueårene"

Saken er> = 30:

MsgBox "Du er over 30."

End Select

End Sub

Word sak Eiendom

Microsoft Word VBA språk har en funksjon-lignende egenskap kalt "case" for å bruke tittelen, punktum og andre saker til tekst. For å se denne egenskapen i aksjon, skriver noen små bokstaver tekst i et nytt dokument, og velg at teksten ved å dobbeltklikke på den. Klikk "Utvikler" fanen Word, klikk på "Visual Basic" -knappen for å gå inn i VBA programmering miljø. Lim inn følgende program i miljøet sentrale vinduet. Dette programmet bruker Word sak eiendom for å konvertere den valgte teksten første til setnings, deretter til tittelen saken. Kjør programmet ved å trykke på "F5". Teksten du har valgt vil endre tilfelle hver gang du trykker på "Enter".

Sub C ()

MsgBox ( "Her er setningen tilfelle ...")

Selection.Range.Case = wdTitleSentence

MsgBox ( "Trykk" Enter "for å se tittelen case")

Selection.Range.Case = wdTitleWord

End Sub