Text in Zahlen umwandeln

Mit diesem sehr einfachen Makro, lässt sich Text in Zahlen umwandeln.
Zu beachten ist, dass aus einer „Textzahl“ 00012 die Zahl 12 wird. Die drei führenden Nullen werden entfernt.

Code

Sub TextInZahl()
   With Range("i2:i20")
    .NumberFormat = "General"
    .Value = .Value
   End With
End Sub

Schreibe einen Kommentar

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind mit * markiert