Lær saken funksjonene til VBA slik at du automatisk kan kapitalisere eller bruke små bokstaver på tekst i stedet for å kreve din programmets brukere til å gjøre det manuelt . Lære " Select sak " statement å redusere rot i koden. Den kunnskapen du får av å lære disse utsagnene 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 ( " hei " ) vil resultere i" HELLO . " Du trenger ikke et program for å prøve dette , men du kan kjøre eksempel bare gitt fra VBA " Direkte "-vinduet. Åpne VBA programmering miljøet ved å klikke på " Visual Basic" -knappen i kategorien Utvikler , og klikk deretter på " Immediate " element under VBA Window -menyen . Skriv inn "debug " statement nettopp beskrev for å se " HELLO " teksten vises .
LCase
VBA sin LCase funksjonen konverterer legge inn tekst til små bokstaver , noe som er nyttig hvis du trenger å sammenligne tekststrenger med ulike saker . for eksempel , hvis programmet har en variabel "x " hvis verdi er " Hello" og en verdi " y" hvis verdi er " HELLO ", så sammenligningen "x = y " ville komme tilbake " False " fordi sakene ikke sammen. sammenligningen " LCase ( x ) = LCase ( y ) " vil gi « True », men fordi uttalelsen endrer tilfelle av alle brev for å redusere .
Select sak
Velg sak funksjonen erstatter flere hvis deretter uttalelser. den Select sak uttalelse tester en variabel , mens den enkelte sak uttalelser gir kanaler for kjøringen av programmet basert på testresultatene . du kan ha så mange case uttalelser etter behov. Hvis du vil være sikker på at Velg sak uttalelse fanger alle mulige forhold , inkluderer en sak Else uttale seg før End Select uttalelse. et eksempel illustrerer hvordan velger case fungerer.
Public Sub testcase ( )
Dim alder
< p> alder = InputBox ( " Skriv inn alder. ")
Select sak alder
sak 13 til 19 : en
MsgBox "Du er en tenåring . "
sak 20 til 29 : en
MsgBox "Du er i tjueårene "
saken er > = 30 : en
MsgBox " Du er over 30 ".
End Velg
End Sub
Word sak eiendom
Microsoft Word VBA språket har en funksjon -lignende eiendom kalt "case" for å bruke tittelen, punktum og andre saker til tekst. for å se denne eiendommen i aksjon , skriver noen små bokstaver tekst i et nytt dokument , og velg at teksten ved å dobbeltklikke på den . Klikk Words "Utvikler " fanen, deretter klikk på " Visual Basic" -knappen for å gå inn i VBA programmering miljø . Lim inn følgende program i miljøet sentrale vindu . Dette programmet bruker Word sak eiendom for å konvertere den valgte teksten først til setning tilfelle, så å forbokstaver . Kjør programmet ved å trykke på "F5 . " Teksten du valgte vil endre tilfelle hver gang du trykker på "Enter".
Sub c ( )
MsgBox ( " Her er forbokstaver ...")
Selection.Range.Case = wdTitleSentence
MsgBox ( " Trykk " Enter " for å se tittelen case" )
Selection.Range.Case = wdTitleWord
End Sub