Wie kann man in Excel mehrere leere Zeilen oder Spalten gleichzeitig in Excel ausblenden?
Das Ausblenden oder Entfernen der leeren Zeilen oder Spalten kann Ihnen beim Verdichten des Arbeitsblatts helfen. In diesem Artikel werde ich Ihnen einige schnelle Möglichkeiten zum Ausblenden oder Entfernen der leeren Zeilen oder Spalten im Excel-Arbeitsblatt vorstellen.
Verstecken Sie schnell mehrere leere Zeilen oder Spalten mit VBA-Code
Löschen Sie mit Kutools for Excel schnell mehrere leere Zeilen oder Spalten
Verstecken Sie schnell mehrere leere Zeilen oder Spalten mit VBA-Code
Mit dem folgenden VBA-Code können Sie schnell und einfach mehrere leere Zeilen oder Spalten in einem Arbeitsblatt ausblenden.
1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. Klicken Sie auf Kostenlos erhalten und dann auf Installieren. Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modul Fenster.
VBA-Code: Blenden Sie mehrere leere Zeilen in einem Arbeitsblatt aus
Sub HideEmpties()
'Updateby Extendoffice
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim I As Long
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
On Error Resume Next
For I = 1 To xRg.Row + xRg.Rows.Count
If Application.WorksheetFunction.CountA(xRg.Rows(I)) = 0 Then
xRg.Rows(I).EntireRow.Hidden = True
End If
Next
End Sub
3. Dann drücken F5 Wenn Sie die Taste drücken, um diesen Code auszuführen, wird ein Aufforderungsfeld angezeigt, das Sie daran erinnert, den Datenbereich auszuwählen, in dem die leeren Zeilen ausgeblendet werden sollen.
4. Und dann klick OK Schaltfläche, die leeren Zeilen werden sofort ausgeblendet, siehe Screenshot:
Note: Um mehrere leere Spalten auszublenden, wenden Sie bitte den folgenden VBA-Code an:
VBA-Code: Blenden Sie mehrere leere Spalten in einem Arbeitsblatt aus
Sub HideEmpties()
'Updateby Extendoffice
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim I As Long
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
On Error Resume Next
For I = 1 To xRg.Column + xRg.Columns.Count
If Application.WorksheetFunction.CountA(xRg.Columns(I)) = 0 Then
xRg.Columns(I).EntireColumn.Hidden = True
End If
Next
End Sub
Löschen Sie mit Kutools for Excel schnell mehrere leere Zeilen oder Spalten
In diesem Abschnitt werde ich darüber sprechen, wie Sie mehrere leere Zeilen oder Spalten löschen, die Sie in einem Bereich, Arbeitsblatt oder einer Arbeitsmappe unerwünscht haben. Das Kutools for Excel Versteckte (sichtbare) Zeilen und Spalten löschen Das Dienstprogramm kann Ihnen helfen, diese Aufgabe so schnell wie möglich zu lösen.
Kutools for Excel : Mit mehr als 300 praktischen Excel-Add-Ins können Sie diese innerhalb von 30 Tagen ohne Einschränkung testen. |
Nach der Installation Kutools for ExcelBitte gehen Sie wie folgt vor:
1. Wählen Sie den Datenbereich aus, in dem Sie die leeren Zeilen oder Spalten löschen möchten, und klicken Sie dann auf Kutoolen > Löschen > Versteckte (sichtbare) Zeilen und Spalten löschen, siehe Screenshot:
2. In dem Versteckte (sichtbare) Zeilen und Spalten löschen Dialogfeld auswählen Im ausgewählten Bereich in Hinein sehen Wählen Sie die Dropdown-Liste aus (Sie können bei Bedarf auch eine andere Option in dieser Dropdown-Liste auswählen) Reihen or Spalten von dem Typ löschen Abschnitt, und wählen Sie Leere Reihen or Leere Spalten unter dem Detaillierter Typ Abschnitt, siehe Screenshot:
3. Und dann klick Ok Schaltfläche, wurden die leeren Zeilen oder Spalten in der Auswahl sofort entfernt. Siehe Screenshot:
Note: Mit dieser Funktion können Sie bei Bedarf auch ausgeblendete Zeilen oder Spalten, sichtbare Zeilen oder Spalten in Auswahl, Arbeitsblatt oder Arbeitsmappe löschen.
Klicken Sie auf Free Download Kutools for Excel Now!
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
- Zuletzt aktualisiert am .