Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
812to816
812to816
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Leerzeichen löschen

Forumthread: Leerzeichen löschen

Leerzeichen löschen
26.10.2006 12:25:28
Fritz
Hallo!
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
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Leerzeichen löschen
26.10.2006 12:47:31
Uduuh
Hallo,
ja, die gibt es.
Warum benutzt du nicht die Funktion GLÄTTEN?
Gruß aus’m Pott
Udo

AW: Leerzeichen löschen
26.10.2006 12:48:51
Heiko
Hallo Fritz,
Bereich wo was passieren soll markieren und das Makro starten, fertig.

Sub TrimmenT()
Dim rngCells As Range
Application.ScreenUpdating = False
For Each rngCells In Selection
rngCells = LTrim(rngCells)
Next rngCells
Application.ScreenUpdating = True
End Sub

Gruß Heiko
PS: Rückmeldung wäre nett !
Anzeige
AW: Leerzeichen löschen
ransi
Hallo Fritz
Wenn deine Daten in Spalte A versuch mal dies:


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


ransi
ransi
Anzeige
AW: Leerzeichen löschen
26.10.2006 13:09:59
Fritz
Danke!
funktioniert
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige