Leerstellen vor Zahl entfernen

Bild

Betrifft: Leerstellen vor Zahl entfernen von: steve
Geschrieben am: 16.03.2005 08:46:31

Hallo,

ich ziehe mit über einen im VBA verfassten Textimport in Excel sehr viele Daten. Jetzt schreibt mir aber meine Datenquelle vor die Kundennummer grundsätzlich 6 Leerzeichen. Das sieht halt dann nicht so berauschend aus. Gibt es eine Möglichkeit in VBA Leerstellen für einen bestimmten Bereich z.B. A2:A50 entfernen zu lassen?

MfG

Steve

Bild


Betrifft: AW: Leerstellen vor Zahl entfernen von: u_
Geschrieben am: 16.03.2005 08:51:11

Hallo,

Sub leerzeichen_weg()
dim c as Range
for each c in Range("A2:A50").cells
c=trim(c)
next c
End Sub

Gruß


Bild


Betrifft: AW: Leerstellen vor Zahl entfernen o.T. von: steve
Geschrieben am: 16.03.2005 08:59:11

vielen Dank, funktioniert


Bild


Betrifft: AW: Leerstellen vor Zahl entfernen von: Matthias G
Geschrieben am: 16.03.2005 08:51:13

Hallo Steve,

z.B.
Sub LeerWeg()
Dim z As Range
For Each z In Range("A2:A50")
z.Value = LTrim(z.Value)
Next z
End Sub
Gruß Matthias


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Leerstellen vor Zahl entfernen"