erster buchstabe Gross variablen bereich max. bis zeile 303

Question

Hallo guten Tag, ich habe das folgende Makro gefunden es soll jedoch nur bis zum Ende dieser zwei spalten (von G2 bis max. H303) ausgeführt werden da es sonst ziemlich lange dauert. Es kann auch sein, dass nur bis G50 bzw. H50 ein Text vorhanden ist. Danke

Sub Grossbuchstabe()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("G2:H303")
      ' There is not a Proper function in Visual Basic for Applications.
      ' So, you must use the worksheet function in the following form:
      x.Value = Application.Proper(x.Value)
   Next
End Sub

Answer 1

Hi Jelena,

sorry, ich hatte diese beiden Codezeilen nur als Test drin, um zu sehen, wie lange das Makro läuft wenn es sich um ca. 300 Zellen pro Spalte handelt - sie sind natürlich nicht notwendig für die eigentliche Aufgabenstellung und können selbstverständlich weggelassen werden.

Bis später, Karin

Answer 2

Hallo Karin, vielen Dank.