csv Datev Daten in Zahl umwandeln
31.07.2019 14:58:13
Georg
aus einer Datev Datei sollen die Daten weiterverarbeitet werden, die Spalte C enthält Zahlen, die wie üblich als StandardFormat geliefert werden.
Wenn ich die Spalte nun mit dem Makro in "echte" Zahlen umwandle, ist über "Zellen Formatieren" zwar Zahl jetzt ausgewählt, aber die Spalte ist immer noch linksbündig formatiert, müsste doch aber bei Zahlen automatisch rechtsbündig sein oder? oder mach ich was falsch?
Vielen Dank. Gruß
Sub Zahl()
ThisWorkbook.Activate ' ist immer die Datei, die das Makro enthält
With ThisWorkbook.Worksheets(1)
lngZ = .Cells(.Rows.Count, 3).End(xlUp).Row
For i = 2 To lngZ
.Cells(i, 3).NumberFormat = "0"
.Cells(i, 3).Value = .Cells(i, 3).Value * 1
Next
End With
End Sub
Anzeige