Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
320to324
320to324
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Leerzeichen Löschen

Leerzeichen Löschen
12.10.2003 17:28:05
Max M.
Hallo Excelfreunde,

ich möchte in den Zellen das Leerzeichen zwischen Buchstaben und Zahlen Löschen und habe folgendes Makro geschrieben, aber leider funktioniert es nicht.
Könnt Ihr mir ein Tipp geben was ich falsch gemacht habe?


Sub LeezeichenLöschen()
Dim i As Integer
Dim J As Integer
For J = 1 To 40 Step 2
For i = 2 To 11 Step 1
With Cells(J, i)
Trim Cells(J, i)
End With
Next i
Next J
End Sub


Max M.

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Leerzeichen Löschen
12.10.2003 17:51:53
Hajo_Zi
Hallo Max

Trim lösch nur Leerstellen davor und danach, willst Du alle entfernen??


Sub LeezeichenLöschen()
Dim i As Integer
Dim J As Integer
For J = 1 To 40 Step 2
For i = 2 To 11 Step 1
Cells(J, i) = Replace(Cells(J, i), " ", "")
Next i
Next J
End Sub


Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.

http://home.media-n.de/ziplies/

Anzeige
AW: Leerzeichen Löschen
12.10.2003 17:58:19
Max M.
Hallo Hajo,

vielen Dank für Deine Hilfe, daß Makro funktioniert.

Gruß Max.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige