Viele Excel-Benutzer verbergen Zeilen und Spalten, wenn sie Daten haben, die nicht sichtbar sind.
Auf diese Weise können Sie nur nützliche Daten sichtbar halten und gleichzeitig nicht die Daten löschen, die nicht sichtbar sein müssen.
Wenn Sie viele solcher versteckten Zeilen / Spalten haben, kann es schwierig sein, diese versteckten Zeilen und Spalten zu finden und zu löschen (falls Sie sie nicht benötigen).
In diesem Tutorial zeige ich Ihnen einige Möglichkeiten, um dies zu vereinfachen versteckte Zeilen und Spalten in Excel löschen.
Es gibt eine integrierte Methode, mit der Sie alle ausgeblendeten Zeilen und Spalten auf einmal löschen können. Sie können auch VBA-Makrocodes verwenden, falls Sie diese auf unseren ausgewählten Zellbereich anwenden möchten.
Also lasst uns anfangen!
Löschen Sie alle ausgeblendeten Zeilen und Spalten in Excel
Wenn Sie alle versteckten Zeilen und Spalten in einer gesamten Arbeitsmappe in Excel löschen möchten, können Sie die hier gezeigte Methode verwenden.
Denken Sie daran, dass diese ausgeblendeten Zeilen und Spalten aus der gesamten Arbeitsmappe und nicht nur aus dem aktiven Blatt entfernt werden.
Im Folgenden finden Sie die Schritte zum Löschen aller ausgeblendeten Zeilen und Spalten aus der Arbeitsmappe in Excel:
- Klicken Sie auf die Option Datei
- Klicken Sie in den Optionen links auf „Info“.
- Klicken Sie auf die Option „Nach Problemen suchen“
- Klicken Sie auf die Option „Dokument prüfen“. Dadurch wird das Dialogfeld Dokumentinspektor geöffnet
- Klicken Sie im Dialogfeld „Dokumentinspektor“ auf die Schaltfläche „Inspizieren“. Dadurch wird die gesamte Arbeitsmappe überprüft und Sie erhalten Informationen zur Arbeitsmappe
- Scrollen Sie nach unten zur Option „Versteckte Zeilen und Spalten“. Sie werden sehen, dass die Gesamtzahl der ausgeblendeten Zeilen und Spalten angezeigt wird, die in der Arbeitsmappe gefunden wurden.
- Klicken Sie auf die Schaltfläche „Alle entfernen“
Mit den obigen Schritten werden alle ausgeblendeten Zeilen und Spalten in der Arbeitsmappe gelöscht.
Beachten Sie, dass Sie diese Arbeitsmappe speichern müssen, bevor Sie die Option Dokumentinspektor ausführen. Falls die Arbeitsmappe noch nicht gespeichert ist, werden Sie zunächst von Excel zum Speichern gezwungen. Außerdem wird eine Warnmeldung angezeigt, in der Sie aufgefordert werden, die Datei einmal zu speichern, da die durch diese Schritte geänderten Daten nicht wiederhergestellt werden können.
Falls keine ausgeblendeten Zeilen und Spalten vorhanden sind, wird vor der Option Ausgeblendet und Zeilen und Spalten (im Dialogfeld Dokumentinspektor) ein grünes Häkchen angezeigt.
Neben ausgeblendeten Zeilen und Spalten enthält das Dialogfeld Dokumentinspektor auch viele andere nützliche Informationen, z. B. die Anzahl der Kommentare, ausgeblendete Arbeitsblätter oder eingebettete Dokumente usw.
Hinweis: Sie können die vom Dokumenteninspektor vorgenommenen Änderungen nicht rückgängig machen. Stellen Sie daher sicher, dass Sie eine Sicherungskopie der Originaldaten haben (falls Sie diese in Zukunft benötigen).
Dies ist eine großartige Methode, wenn Sie alle ausgeblendeten Spalten und Zeilen für die gesamte Arbeitsmappe löschen möchten.
Wenn Sie es jedoch nur in einem bestimmten Blatt oder in einem bestimmten Bereich löschen möchten, können Sie diese Option nicht verwenden.
In diesem Fall können Sie die als nächstes behandelte VBA-Methode verwenden.
Löschen Sie ausgeblendete Zeilen und Spalten mit VBA
Wenn Sie nur wenige ausgeblendete Zeilen und Spalten haben, können Sie diese manuell einblenden und dann löschen.
Wenn Sie dies jedoch häufig tun müssen oder wenn Sie einen großen Datensatz mit einer großen Anzahl ausgeblendeter Zeilen / Spalten haben, verwenden Sie am besten VBA-Makrocodes, um diesen Prozess zu automatisieren.
Schauen wir uns verschiedene Szenarien an, in denen Sie diese versteckten Zeilen und Spalten mit VBA löschen können.
Aus einem gesamten Arbeitsblatt (Verwendeter Bereich)
Während ich den VBA-Code veranlassen kann, das gesamte Arbeitsblatt beginnend mit der letzten Zeilennummer und der letzten Spaltennummer im Arbeitsblatt zu überprüfen, wäre dies eine Verschwendung von Ressourcen.
Eine bessere Methode wäre, den verwendeten Bereich zu ermitteln und diesen Bereich dann nur auf ausgeblendete Zeilen und Spalten zu überprüfen.
Unten finden Sie den VBA-Code, mit dem alle ausgeblendeten Zeilen im verwendeten Bereich gelöscht werden:
Sub DeleteHiddenRows() Dim sht As Worksheet Dim LastRow Set sht = ActiveSheet LastRow = sht.UsedRange.Rows(sht.UsedRange.Rows.Count).Row For i = LastRow To 1 Step -1 If Rows(i).Hidden = True Then Rows(i).EntireRow.Delete Next End Sub
Der obige VBA-Code ermittelt zuerst die letzte Zeilennummer im verwendeten Bereich und weist diese Zeilennummer der Variablen „LastRow“ zu.
Diese letzte Zeilennummer wird dann in a verwendet Für die nächste Schleife, wo es in der letzten Zeile beginnt und prüft, ob es versteckt ist oder nicht.
Falls es ausgeblendet ist, wird die gesamte Zeile gelöscht. Und falls es nicht ausgeblendet ist, lässt der Code diese Zeile unverändert und wechselt in die darüber liegende Zeile. Diese Schleife sucht nach allen Zeilen und löscht alle versteckten Zeilen, auf die sie dabei stößt.
Wenn Sie alle ausgeblendeten Spalten im verwendeten Bereich löschen möchten, verwenden Sie den folgenden VBA-Code:
Sub DeleteHiddenColumns() Dim sht As Worksheet Dim LastCol as Integer Set sht = ActiveSheet LastCol = sht.UsedRange.Columns(sht.UsedRange.Columns.Count).Column For i = LastCol To 1 Step -1 If Columns(i).Hidden = True Then Columns(i).EntireColumn.Delete Next End Sub
Dies funktioniert wieder auf die gleiche Weise, wobei anstelle von Zeilen nach Spalten gesucht wird.
So findet es die letzte Spaltennummer im verwendeten Bereich heraus, weist sie einer Variablen zu und dann verwendet die Schleife um von der letzten zur ersten Spalte zu wechseln und alle versteckten Spalten im Prozess zu löschen.
Wenn Sie einen Code benötigen, mit dem alle ausgeblendeten Zeilen sowie die ausgeblendeten Spalten gelöscht werden, verwenden Sie den folgenden VBA-Code:
Sub DeleteHiddenRowsColumns() Dim sht As Worksheet Dim LastRow as Integer Dim LastCol as Integer Set sht = ActiveSheet LastRow = sht.UsedRange.Rows(sht.UsedRange.Rows.Count).Row LastCol = sht.UsedRange.Columns(sht.UsedRange.Columns.Count).Column For i = LastRow To 1 Step -1 If Rows(i).Hidden = True Then Rows(i).EntireRow.Delete Next For i = LastCol To 1 Step -1 If Columns(i).Hidden = True Then Columns(i).EntireColumn.Delete Next End Sub
Dies ist nur der kombinierte Code für Zeilen und Spalten und funktioniert auf die gleiche Weise.
Anstelle einer Schleife werden zwei separate Schleifen verwendet, in denen zuerst alle Zeilen und dann alle Spalten durchlaufen werden. Dabei werden alle versteckten Zeilen und Spalten gelöscht, auf die es stößt.
Beachten Sie, dass Sie diesen VBA-Code in einem regulären Modul in der platzieren müssen Visual Basic-Editor. Sie können dann Führen Sie den Code aus direkt aus dem VB-Editor, über das Makrodialogfeld oder durch Hinzufügen dieses Makros zur Symbolleiste für den Schnellzugriff.
Wenn Sie dies häufig tun müssen, können Sie diesen Code auch zum hinzufügen persönliche Makro-Arbeitsmappe Damit Sie von allen Arbeitsmappen auf Ihrem System darauf zugreifen können.
Aus einem bestimmten Zellbereich
Wenn Sie einen bestimmten Bereich haben, aus dem Sie versteckte Zeilen und Spalten entfernen möchten, müssen Sie diesen im Code angeben.
Dadurch wird sichergestellt, dass der Code nur die Zeilen und Spalten in dem angegebenen Bereich umkreist und die anderen Bereiche im Arbeitsblatt unberührt bleiben
Unter dem VBA-Code, der dies tun würde:
Sub DeleteHiddenRowsColumns()
Dim sht As Worksheet
Dim Rng As Range
Dim LastRow As Integer
Dim RowCount As Integer
Set sht = ActiveSheet
Set Rng = Range("A1:K200")
RowCount = Rng.Rows.Count
LastRow = Rng.Rows(Rng.Rows.Count).Row
ColCount = Rng.Columns.Count
LastCol = Rng.Columns(Rng.Columns.Count).Column
For i = LastRow To LastRow - RowCount Step -1
If Rows(i).Hidden = True Then Rows(i).EntireRow.Delete
Next
For j = LastCol To LastCol - ColCount Step -1
If Columns(j).Hidden = True Then Columns(j).EntireColumn.Delete
Next
End Sub
Im obigen Code habe ich den Bereich als A1: K200 angegeben.
Dadurch durchläuft der Code alle Zeilen und Spalten im angegebenen Bereich und entfernt alle versteckten Zeilen und Spalten, auf die er stößt.
Wenn Sie Zeilen oder Spalten außerhalb dieses Bereichs ausgeblendet haben, bleiben diese davon unberührt.
So können Sie also löschen versteckte Zeilen und Spalten in Excel.
Wenn Sie dies für die gesamte Arbeitsmappe tun möchten, können Sie die Option Dokumentinspektor verwenden. Und falls Sie mehr Kontrolle benötigen, können Sie die oben gezeigten VBA-Codes verwenden.
Ich hoffe, Sie fanden dieses Tutorial hilfreich!
Andere Excel-Tutorials, die Ihnen gefallen könnten:
Der Beitrag So löschen Sie alle ausgeblendeten Zeilen und Spalten in Excel »Trump Excel erschien zuerst auf Anfänger Kurse.
from
https://fuer-anfaenger.info/so-loeschen-sie-alle-ausgeblendeten-zeilen-und-spalten-in-excel-trump-excel/
No comments:
Post a Comment