Excel und VBA - Die Excel-FAQ

Umwandeln von Zeichenfolgen in Währung

Screenshots zu den Aufrufoberflächen der Excel-Materialien

Umwandeln von Zeichenfolgen in Währung

Problem: Die Zeichenfolgen in Spalte A sollen in Währung umgewandelt werden. Der zu bearbeitende Bereich ist auszuwählen.

StandardModule: Modul1

Sub Umwandeln()
   Dim rng As Range
   For Each rng In Selection.Cells
      With rng
         .NumberFormat = "€ #,##0.00"
         .Value = .Value
      End With
   Next rng
End Sub