Excel endre tekst til små bokstav

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