Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
380to384
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
380to384
380to384
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Text GLÄTTEN

Text GLÄTTEN
17.02.2004 11:22:23
Lars
Hallo,
es gibt im Excel die Funktion GLÄTTEN, die in einem Text aus mehreren Leerzeichen ein einziges macht.
Gibt es eine Möglichkeit, diese Funktion auch im VBA anzuwenden?
Gruß
Lars

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Text GLÄTTEN
17.02.2004 11:26:29
Joachim W.
Hallo,
versuch's mal mit TRIM.
Gruß
Joachim
AW: Text GLÄTTEN
17.02.2004 11:26:39
Fabian
Für führende oder nachfolgende Leerzeichen erledigt das die Funktion:
TRIM(" TEXT ") 'Liefert: "TEXT"
Für Leerzeichen innerhalb des Textes musst Du diesen wohl zeichenweise mit Hilfe der MID()-Funktion und einer Schleife (For i = 1 to len(" TEXT" ) )durchlaufen.
Alles klar?
Viele Grüsse
Fabian
AW: Text GLÄTTEN
17.02.2004 11:30:38
Lars
Hallo Fabian,
genau das ist es!
Danke Dir
Lars
AW: Text GLÄTTEN
17.02.2004 11:37:49
Panicman
Hallo Fabian, Hallo Lars,
nicht so kopliziert !!!
benutze "WorksheetFunction.Trim(...)" und alle doppelten Leerzeichen sind weg !!!
Gruß
Holger
Anzeige
AW: Text GLÄTTEN
17.02.2004 13:20:53
Lars
Hallo Holger,
das Problem bei der TRIM-Funktion ist aber, dass zum einen die Leerzeichen gelöscht und nicht wie bei der GLÄTTEN-Funktion durch ein einzelnes Leerzeichen ersetzt werden und zum anderen nur am Anfang oder/und am Ende gelöscht werden aber nicht im Text.
Gruß
Lars
AW: Trim vs. Worksheetfunktion.Trim
17.02.2004 13:29:07
Panicman
Hallo Lars,
das stimmt nicht.
Es gibt 2 VBA-Funktionen:
Trim()
Worksheetfunction.Trim()
Das ist ein Unterschied !!!!!
https://www.herber.de/bbs/user/3721.xls
Gruß
Holger
AW: Trim vs. Worksheetfunktion.Trim
17.02.2004 15:05:44
Fabian
Danke Holger,
man lernt nie aus
Fabian
AW: Text GLÄTTEN
17.02.2004 11:33:20
Galenzo
Hallo,
z.B. so:
[a1] = WorksheetFunction.Trim([a1])
mfg
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige