Kategorier
Diverse Excel

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.

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
End Sub

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