Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Trimmen (Glätten)

Forumthread: Trimmen (Glätten)

Trimmen (Glätten)
09.11.2004 08:35:54
Dr.
Moin zusammen,
kennt jemand einen schlanken Weg, per VBA alle Zellen einer Spalte zu trimmen?
Danke im voraus!
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Trimmen (Glätten)
xule
so?

Sub trimmen()
'Spalte vorher markieren
LR = Cells(Rows.Count, Selection.Column).End(xlUp).Row
For Each Z In Selection
If Z.Row > LR Then Exit For
Z.Value = Trim(Z.Value)
Next
End Sub

AW: Trimmen (Glätten)
Dr.
Hmmm, da trimmt sich irgendwie gor nix...!?!
AW: Trimmen (Glätten)
xule
Hallo
bei mir werden vorangestelle und anhängende Leerzeichen gelöscht.
Wenn innerhalb des Textes wiederholte Leerzeichen (nur wenn mehr als 1 hintereinanderfolgt) auch weggelöscht werden sollen dann hilft die Trimmfunktion von Excel.
Dazu noch Application. davorschreiben..

Sub trimmen()
'Spalte vorher markieren
LR = Cells(Rows.Count, Selection.Column).End(xlUp).Row
For Each z In Selection
If z.Row > LR Then Exit For
z.Value = Application.Trim(z.Value)'>>>>>>>>>>>>hier geändert
Next
End Sub

Anzeige
Thx!!!! (oT)
Dr.
.
Thx!!!! (oT)
Dr.
.
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige