wie kann ich mit Excel od. VBA alle Zahlen in Spalte A umkehren? Z.B. 12345 soll 54321 werden, von A1 bis A120. Habe ohne Erfolg herum gegoogelt, fragen ist leichter als antworten.
Gruß, Erhard
Public Sub test()
MsgBox StrReverse("123456")
End Sub
Gruß
Nepumuk
Public Function Umkehren1(Wert As String) As String
Umkehren1 = StrReverse(Wert)
End Function
Public Function Umkehren2(Wert As String) As String
Dim i As Long
For i = Len(Wert) To 1 Step -1
Umkehren2 = Umkehren2 & Mid$(Wert, i, 1)
Next
End Function
die Verwendung in Excel sieht dann einfach so aus:
=Umkehren1(A1)
Gruß, Daniel