Ich habe in der spalte a verschiedene eintragungen. bei manchen sind vorher leerzeichen enthalten . gibts eine möglichkeit die leerzeichen mit eoinem makro vor dem ersten buchstaben oder zahl zu löschen?
Danke
Sub TrimmenT()
Dim rngCells As Range
Application.ScreenUpdating = False
For Each rngCells In Selection
rngCells = LTrim(rngCells)
Next rngCells
Application.ScreenUpdating = True
End Sub
Option Explicit
Public Sub test()
Dim arr
Dim L As Long
Dim letzte As Long
letzte = Range("A65536").End(xlUp).Row
arr = Range("A1:A" & letzte)
For L = 1 To UBound(arr)
arr(L, 1) = WorksheetFunction.Trim(arr(L, 1))
Next
Range("A1:A" & letzte) = arr
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen