Kann man die Formel =glätten() mit VBA umsetzen? Und wie würde das aussehen, wenn ich die Spalte B "glätten" lassen würde?
mfg
Thorsten
Sub Glatt()
Dim i As Integer
i = 1
Do While Cells(i,2) <> ""
Cells(i,2) = Trim(Cells(i,2).Value)
i = i + 1
Loop
End Sub
Um die Funktion =glätten()
in Excel mit VBA umzusetzen, befolge diese Schritte:
Öffne Excel und drücke ALT + F11
, um den VBA-Editor zu öffnen.
Klicke auf Einfügen
und wähle Modul
, um ein neues Modul zu erstellen.
Kopiere den folgenden Code in das Modul:
Sub Glatt()
Dim i As Integer
i = 1
Do While Cells(i, 2) <> ""
Cells(i, 2) = Trim(Cells(i, 2).Value)
i = i + 1
Loop
End Sub
Schließe den VBA-Editor und kehre zu Excel zurück.
Drücke ALT + F8
, wähle Glatt
aus der Liste und klicke auf Ausführen
, um die Funktion anzuwenden.
Mit diesem VBA-Skript kannst Du die Inhalte in Spalte B glätten, indem überflüssige Leerzeichen entfernt werden. Dies ist eine effektive Methode, um Daten in Excel zu bereinigen.
Fehler: "Laufzeitfehler 1004: Anwendung oder Objekt definieren."
Fehler: "Das Skript läuft nicht."
Datei
> Optionen
> Sicherheitscenter
> Einstellungen für das Sicherheitscenter
und aktiviere die Makros.Falls Du keine VBA-Lösungen verwenden möchtest, kannst Du auch die integrierte Funktion TRIM()
in Excel nutzen. Diese Funktion entfernt ebenfalls überflüssige Leerzeichen:
=TRIM(B1)
ein (ersetze B1 durch die Zelle, die Du bereinigen möchtest).Diese Methode ist einfach und benötigt keine Programmierkenntnisse.
Angenommen, Du hast in Spalte B folgende Daten:
B |
---|
Hallo |
Welt |
Excel |
Wenn Du das VBA-Skript ausführst oder die TRIM()
-Funktion anwendest, wird das Ergebnis in Spalte B:
B |
---|
Hallo |
Welt |
Excel |
Beide Methoden helfen, die Daten in Excel zu glätten und die Lesbarkeit zu verbessern.
TRIM()
-Funktion direkt in Deine Datenabfragen zu integrieren, um sicherzustellen, dass Deine Daten immer sauber sind, bevor Du damit arbeitest.1. Was ist der Unterschied zwischen TRIM()
und =glätten()
?
Die Funktion TRIM()
ist die Excel-Variante, die überflüssige Leerzeichen entfernt. In VBA entspricht die Funktion Trim()
dieser Excel-Funktion.
2. Kann ich das Skript für andere Spalten anpassen?
Ja, ändere einfach den Wert in Cells(i, 2)
auf die gewünschte Spalte, z.B. Cells(i, 3)
für Spalte C.
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