Ganzes Tabellenblatt glätten in Excel
Schritt-für-Schritt-Anleitung
Um ein ganzes Tabellenblatt in Excel zu glätten und Leerzeichen zu entfernen, kannst du den folgenden VBA-Code verwenden:
-
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
-
Klicke auf Einfügen > Modul, um ein neues Modul zu erstellen.
-
Füge den folgenden Code in das Modul ein:
Sub TrimCells()
Dim objSh As Worksheet
Dim rng As Range, rngR As Range
Dim lngCalc As Long
On Error GoTo ErrExit
With Application
.EnableEvents = False
.ScreenUpdating = False
lngCalc = .Calculation
.Calculation = xlCalculationManual
End With
For Each objSh In ThisWorkbook.Worksheets
On Error Resume Next
Set rngR = objSh.UsedRange.SpecialCells(xlCellTypeConstants)
Err.Clear
On Error GoTo ErrExit
If Not rngR Is Nothing Then
For Each rng In rngR
rng = Trim(rng)
Next
End If
Next
ErrExit:
With Application
.EnableEvents = True
.ScreenUpdating = True
.Calculation = lngCalc
End With
End Sub
-
Schließe den VBA-Editor und kehre zu Excel zurück.
-
Drücke ALT + F8, wähle TrimCells aus und klicke auf Ausführen.
Dieser Code entfernt Leerzeichen aus allen Zellen des aktiven Tabellenblatts und kann in allen Excel-Versionen verwendet werden.
Häufige Fehler und Lösungen
Alternative Methoden
Wenn du keine VBA-Makros verwenden möchtest, kannst du auch eine Formel in einem neuen Tabellenblatt verwenden:
- Erstelle ein neues Tabellenblatt.
- Verwende die Formel
=GLÄTTEN(Tabelle1!A1) in Zelle A1, um die Zelle von Tabelle1 zu glätten.
- Ziehe die Formel nach unten und nach rechts, um sie auf alle relevanten Zellen anzuwenden.
- Kopiere die resultierenden Werte zurück in die ursprüngliche Tabelle mit
Inhalte einfügen > Werte.
Praktische Beispiele
Angenommen, du hast folgende Daten in Tabelle1:
| A |
B |
| 01234 |
Test |
| 05678 |
Beispiel |
| 01234 |
Excel |
Nach Verwendung des VBA-Codes oder der Formel, wird die Tabelle so aussehen:
| A |
B |
| 01234 |
Test |
| 05678 |
Beispiel |
| 01234 |
Excel |
Tipps für Profis
- Um sicherzustellen, dass die Daten in den Spalten korrekt formatiert sind, kannst du vor der Anwendung des Makros alle relevanten Spalten als Text formatieren.
- Du kannst das Makro anpassen, um nur bestimmte Spalten zu glätten, indem du die
UsedRange-Eigenschaft auf einen bestimmten Bereich einschränkst.
FAQ: Häufige Fragen
1. Wie kann ich nur eine bestimmte Spalte glätten?
Du kannst den Bereich in der UsedRange-Eigenschaft so anpassen, dass nur die gewünschte Spalte berücksichtigt wird, z.B. objSh.Range("A:A").
2. Funktioniert das auch in Excel Online?
Leider funktionieren VBA-Makros nicht in Excel Online. Du kannst jedoch die Formelmethode verwenden, um Daten zu glätten.