Excel-Makro zu ändern, ganze Spalte in Großbuchstaben

Ich versuche, die Aktualisierung einer Arbeitsmappe habe ich ändern Sie alle E-Mails von klein-zu Großbuchstaben.
Ich bin nicht so versiert mit Makros noch nicht, aber ich kam mit dieser ein, aber es dauert ewig zu laufen. (nur etwa ~1k Zeilen).

Sub Uppercase()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("B:B")
      ' Change the text in the column to uppercase letters.
      x.Value = UCase(x.Value)
   Next
End Sub

Ist es etwas besser sollte ich verwenden?

tl;dr ich ändern müssen ganze Spalten Fall, in Großbuchstaben um.

InformationsquelleAutor Jak Parr | 2015-03-11
Schreibe einen Kommentar