Jeg bruker Excel mye i jobben, og i blant har jeg behov for å gjøre større like oppdateringer av tekst. Eksempler på dette er å endre tekst i et område til kun små bokstaver, eller endre tekst til kun store bokstaver. Eller som også ofte er vanlig, ord med kun stor forbokstav. Her er eksempler på makro.
Endre tekst til små bokstaver
Sub Lowercase()
‘ Loop for å gå igjennom ordene i et område
For Each x In Range(«A1:A10»)
‘ endre teksten til lowercase
x.Value = LCase(x.Value)
Next
End Sub
Endre tekst til store bokstaver
Sub Uppercase()
‘ Loop for å gå igjennom ordene i et område
For Each x In Range(«A1:A10»)
‘ endre teksten til uppercase
x.Value = UCase(x.value)
Next
Endre tekst til stor forbokstav og små bokstaver
Sub Proper_Case()
‘ Loop for å gå igjennom alle ordene i et område
For Each x In Range(«A1:A10»)
x.Value = Application.Proper(x.Value)
Next
End Sub