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.

Diese Website verwendet Akismet, um Spam zu reduzieren. Erfahre mehr darüber, wie deine Kommentardaten verarbeitet werden.