Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Leerzeichen entfernen

Forumthread: Leerzeichen entfernen

Leerzeichen entfernen
23.02.2006 10:21:03
Daniele
Hallo zusammen...!
Ich bin gerade dabei eine Sverweis Checkbox zu erstellen, da dieser oft auf anhieb nicht funktioniert.
1. Funktion: Entfernen von Leerzeichen links und rechts des markierten bereichs.
Beispiel:
ZelleA1: " te st "
nach ausfürhen des makros:
ZelleA1: "te st"
Es sollen also aus jeder markierten Zelle alle Leerzeichen am Anfang und am Ende des Inhalts enfternt werden.
Würde mich freuen wenn da jemand einen code parat hat.
Vielen Dank im voraus,
daniele!
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Leerzeichen entfernen
23.02.2006 10:47:52
Nepumuk
Hi,
bitteschön:
Public Sub prcKillBlanks()
    Dim objCell As Range
    Application.ScreenUpdating = False
    For Each objCell In Selection
        objCell.Value = Trim$(objCell.Text)
    Next
    Application.ScreenUpdating = True
End Sub

Gruß
Nepumuk

Anzeige
AW: Leerzeichen entfernen
23.02.2006 10:57:11
Daniele
Vielen Dank für die super schnellen Antworten...
Mein Problem ist damit gelöst!!!
Gruß
daniele
AW: Leerzeichen entfernen
23.02.2006 10:48:01
u_
Hallo,
Range("a1")=Trim(Range("a1")
Gruß
Geist ist geil!
AW: Leerzeichen entfernen
23.02.2006 10:51:12
roland_k
hi daniele
schau dier mal in der hilfe Trim ...nach
das entfernt leerzeichen
bin auch nicht so firm...wenn das nicht weiterhilft ...warte mal auf weitere antwort
drum habe die frage als offen gelassen
gutes gelingen
gruss
roland_k
Anzeige
oh erledigt...o. T
23.02.2006 10:53:14
roland_k
sorry
AW: oh erledigt...o. T
23.02.2006 10:59:46
daniele
Also die erste Antwort von "Neupunkt" (hoffe ich habe den namen richtig im Kopf)
klappts einwandfrei!!!
Gruß
Daniele
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige