VBA Ende in einer Selektion bestimmen
26.09.2022 11:18:37
Addi
mit folgenden Coding konvertiere ich eine Selektion in das Zahlenformat.
Sub ConvertToNumber()
With Selection
.NumberFormat = "General"
.Value = .Value
.HorizontalAlignment = xlLeft
End With
End Sub
Da es sich um große Dateien handelt und ich bis zu 10 Spalten mit teilweise 5000 Zeilen markieren muss, markiere ich eine ganze Spalte und führe das Makro aus...nun werden aber alle 1.048.576 Zeilen entsprechend bearbeitet und die Datei bekommt auch eine entsprechende Größe...Wie kann ich dieses Coding anpassen, das es nur bis zur letzten gefüllten Zeile in der selektieren Spalte das Makro anwendet?
Vielen Dank vorab und viele Grüße
Addi