Ich möchte prüfen, ob das 5. Zeichen von rechts ein Leerzeichen ist, falls ja, dieses löschen.
Das ganze in VBA.
Die Stringfolge in den zu prüfenden Zellen sind unterschiedlich lang. Muss also von rechts suchen.
Hat jemand einen Tipp?
hartmut
Sub leer_vor_mp3_weg()
Dim rng As Range
For Each rng In Sheets(1).Range("B1:B2000")
If Left(Right(rng, 5), 1) = " " Then
rng = Left(rng, Len(rng) - 5) & Right(rng, 4)
End If
Next
End Sub
Nochmals vielen Dank für eure Anregungen.
Hartmut