når du arbejder i VBA, skal du ofte konvertere strenge til små, store eller korrekte sager. Dette er muligt ved at bruge funktionerne UCase, LCase og StrConv.
disse funktioner er vigtige, når man manipulerer strenge i VBA, da VBA er store og små bogstaver. Hvis du ønsker at gøre VBA case-ufølsom, skal du tilføje mulighed Sammenlign Tekst øverst på dit modul. Du kan finde ud af mere om dette her: Undgå VBA store og små bogstaver
UCase – konverter streng til store bogstaver
UCase-funktionen i VBA konverterer alle bogstaver i en streng til store bogstaver. Der er kun et argument, som kan være en streng, variabel med streng eller en celleværdi. Denne funktion bruges ofte, hvis du vil sammenligne to strenge. Her er koden til UCase-funktionen:
|
1
2
3
4
5
6
7
8
|
Dim strtekst som streng
Dim strtekstase som streng
strtekst = “kører store bogstaver funktion”
strtekstase = UCase (strtekst)
Msgboks strtekstase
|
i eksemplet vil vi konvertere alle bogstaver i strtekstvariablen til store bogstaver og tildele den konverterede streng til strtekstukasevariablen. I slutningen kalder vi meddelelsesboksen med den konverterede streng:
billede 1. Brug af UCase-funktionen i VBA
LCase – konverter streng til små bogstaver
hvis du vil konvertere alle bogstaver i en streng til små bogstaver, skal du bruge lcase-funktionen. Denne funktion har et argument, det samme som UCase. Dette er koden til lcase-funktionen:
|
1
2
3
4
5
6
7
8
|
Dim strtekst som streng
Dim strtekstcase som streng
strtekst = “kører små bogstaver”
strtekstcase = LCase (strtekst)
Msgboks strtekstcase
|
i dette eksempel konverterer vi alle bogstaver i strengen fra A1 til små bogstaver. Derefter tildeles den konverterede streng til cellen A1.
billede 2. Brug af lcase-funktionen i VBA
StrConv-konverter streng til korrekt sag
StrConv-funktionen giver dig mulighed for at konvertere en tekststreng til korrekt sag. Funktionen har to argumenter. Først er den streng, du vil konvertere. Den anden er den type konvertering, som du ønsker. For at konvertere en streng til en ordentlig sag skal du indstille den til vbProperCase. Koden for funktionen er:
|
1
2
3
4
5
6
7
8
|
Dim strText As String
Dim strTextProperCase As String
strText = “running proper case function”
strTextProperCase = StrConv(strText, vbProperCase)
MsgBox strTextProperCase
|
You will see on the example how the function works. Det tager strengen fra cellen B1, konverterer den til korrekt sag og returnerer værdien i cellen A1.
billede 3. Brug af StrConv-funktionen i VBA
StrConv-konverter streng til store eller små bogstaver
ved hjælp af StrConv-funktionen kan du også konvertere en streng til store eller små sager. For at gøre dette skal du bare indstille det andet argument til vbUpperCase eller vbuppercase:
|
1
|
strtekstkonverteret = StrConv (strtekst, vbUpperCase)
|
|
1
|
strtekstkonverteret = StrConv (strtekstbogstav))
|
VBA øverste, nederste og korrekte Case – Case-funktioner i Access
alle ovenstående eksempler fungerer nøjagtigt det samme i Access VBA som i Access VBA.
|
1
2
3
4
|
privat Sub ClientName_AfterUpdate ()
‘dette konverterer teksten i feltet Klientnavn til store bogstaver
mig.ClientName = UCase (Mig.ClientName)
End Sub
|
