Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
436to440
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
436to440
436to440
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

vba; hier Leerstellen entfernen

vba; hier Leerstellen entfernen
03.06.2004 13:50:01
franz
Grüßt Euch alle !
Folgendes Problem nagt an mir:
In der Spalte A stehen Texte wie: Fronhof bei Güterloh.
Nun habe ich Probleme für einen Abgleich, da hinter dem letzten
Word immer Leerstellen sind.
Wie kann ich diese Leerzeichen am Ende des letzten Wortes in
Spalte A über Makro löschen ?
Gruss
franz

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: vba; hier Leerstellen entfernen
03.06.2004 13:52:46
Matthias G
Hallo Franz,
so:

Sub test()
Dim z As Range
For Each z In Intersect(ActiveSheet.UsedRange, Columns(1))
z.Value = Trim(z.Value)
Next z
End Sub

Gruß Matthias
AW: vba; hier Leerstellen entfernen
03.06.2004 13:53:45
Kurt
RTrim(Zelle)
Kurt
AW: vba; hier Leerstellen entfernen
03.06.2004 13:57:41
andre
Hallo Franz,
per Formel:
=Glätten(A1) entfernt Leerzeichen am Anfang und Ende
per Makro:

Sub glättenvba()
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
Cells(i, 1) = Trim(Cells(i, 1))
Next
End Sub

AW: vba; hier Leerstellen entfernen
03.06.2004 15:05:50
franz
Vielen Dank für Eure Hilfe.
Hat alles gefunzt.

Danke
franz

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige