Ich hoffe ihr könnt mir helfen.
MfG
Marko
Möchte aber das es VBA so macht wie der Befehl =GLÄTTEN()
Marko
Habe den Befehl Trim schon ein paar mal gebraucht aber im Office 2000 und das klappt sehr gut.
So entferne ich die Leerzeichen auch im Text.
Gruss TOM
Öffne den Visual Basic-Editor in Excel. Du kannst dies tun, indem du ALT + F11 drückst.
Erstelle ein neues Modul: Klicke mit der rechten Maustaste auf einen der Einträge im Projekt-Explorer und wähle Einfügen > Modul.
Füge den folgenden VBA-Code ein, um eine Funktion zu erstellen, die das Glätten von Text ermöglicht:
Function Glätten(ByVal Text As String) As String
Dim Temp As String
' Entferne überflüssige Leerzeichen
Temp = Application.WorksheetFunction.Trim(Text)
' Ersetze mehrere Leerzeichen mit einem einzelnen Leerzeichen
Temp = Replace(Temp, " ", " ")
Glätten = Temp
End FunctionSpeichere das Modul und schließe den Editor.
Verwende die Funktion in Excel: Du kannst die Funktion =Glätten(A1) in einer Zelle verwenden, um den Text in Zelle A1 zu glätten.
Problem: Die Funktion gibt einen Fehler zurück.
Problem: Die Funktion entfernt nicht alle Leerzeichen.
Replace-Funktion im Code richtig konfiguriert hast. Es könnte notwendig sein, die Ersetzung mehrmals zu wiederholen, um alle überflüssigen Leerzeichen zu entfernen.Falls du keine VBA-Lösungen verwenden möchtest, kannst du die Excel-Funktion =GLÄTTEN() nutzen. Diese Funktion entfernt ebenfalls überflüssige Leerzeichen, allerdings nur am Anfang und Ende des Textes. In der englischen Excel-Version heißt die Funktion TRIM().
Für eine komplette Glättung der gesamten Tabelle kannst du auch eine Kombination aus =GLÄTTEN() und =WECHSELN() verwenden, um mehrere Leerzeichen innerhalb des Textes zu ersetzen.
Beispiel 1: Glätten eines Textes in Zelle A1
" Dies ist ein Test. "=Glätten(A1)"Dies ist ein Test."Beispiel 2: Nutzung in einer Tabelle
Application.WorksheetFunction für Excel-Funktionen: Damit kannst du die Leistungsfähigkeit von Excel direkt in deinem VBA-Code nutzen.1. Was ist der Unterschied zwischen TRIM() und GLÄTTEN()?
TRIM() entfernt nur Leerzeichen am Anfang und Ende eines Textes, während GLÄTTEN() auch zusätzliche Leerzeichen zwischen Wörtern entfernt.
2. Kann ich die Funktion auch in Access verwenden?
Ja, die Funktion kann in VBA für Access verwendet werden. Du musst jedoch sicherstellen, dass du die entsprechenden Visual Basic Befehle anwendest.
3. Gibt es eine englische Version der Glätten-Funktion?
In der englischen Version von Excel lautet die Funktion TRIM(). Du kannst sie in deinen Formeln verwenden, um Leerzeichen zu entfernen.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen