Wie kann ich Spalten basierend auf dem Datum in Excel automatisch ausblenden?
Angenommen, ich habe eine Reihe von Daten in einem Arbeitsblatt. Jetzt möchte ich die Spalten basierend auf einem bestimmten Datum automatisch ausblenden. Wenn ich beispielsweise das Datum 5 in eine Zelle eingebe, möchte ich die Spalten, deren Datum unter diesem bestimmten Datum liegt, sofort ausblenden, wie im folgenden Screenshot gezeigt. In diesem Artikel werden einige Tricks zur Lösung vorgestellt.
Spalten basierend auf einem bestimmten Datum mit VBA-Code automatisch ausblenden
Blenden Sie Spalten basierend auf einem bestimmten Datum mit Kutools for Excel aus
Spalten basierend auf einem bestimmten Datum mit VBA-Code automatisch ausblenden
Um diese Aufgabe abzuschließen, kann Ihnen der folgende VBA-Code helfen: Gehen Sie wie folgt vor:
1. Wählen Sie die Registerkarte "Blatt" aus, die Sie nach Datum ausblenden möchten, und klicken Sie mit der rechten Maustaste, um sie auszuwählen Code anzeigen aus dem Kontextmenü, um zum Microsoft Visual Basic für Applikationen Kopieren Sie den folgenden Code und fügen Sie ihn in das Modul ein:
VBA-Code: Spalten basierend auf einem bestimmten Datum automatisch ausblenden:
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
Dim xCell As Range
If Target.Address <> Range("K4").Address Then Exit Sub
Application.ScreenUpdating = False
For Each xCell In Range("A1:I1")
xCell.EntireColumn.Hidden = (xCell.Value < Target.Value)
Next
Application.ScreenUpdating = True
End Sub
2. Speichern und schließen Sie diesen Code, kehren Sie zum Arbeitsblatt zurück und geben Sie das Datum in die Zelle ein K4werden die Spalten, deren Datum unter diesem bestimmten Datum liegt, automatisch ausgeblendet.
Note: Im obigen Code, K4 ist die spezifische Datumszelle, auf der Sie die Spalten basierend auf ausblenden möchten. A1: I1 Ist die Zeile Zellen enthalten das Datum, das Sie verwendet haben.
Blenden Sie Spalten basierend auf einem bestimmten Datum mit Kutools for Excel aus
Wenn Sie mit dem Code nicht vertraut sind, finden Sie hier ein praktisches Tool:Kutools for ExcelMit seinen Wählen Sie Bestimmte Zellen aus Dienstprogramm, können Sie diesen Job mit Leichtigkeit beenden.
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 die Datumsüberschriften aus und klicken Sie auf Kutoolen > Auswählen > Wählen Sie Bestimmte Zellen aus, siehe Screenshot:
2. In der herausgesprungen Wählen Sie Bestimmte Zellen aus Dialogfeld auswählen Ganze Spalte von dem Auswahltypund wählen Sie dann die Kriterien aus, z Weniger als von dem Spezifischer Typ Dropdown-Liste, und geben Sie das Datum in das nebenstehende Textfeld ein, auf dessen Grundlage Sie Spalten ausblenden möchten (siehe Abbildung):
3. Und dann klick Ok Schaltfläche, werden die spezifischen Spalten, deren Datum kleiner als der 5 ist, sofort ausgewählt, siehe Screenshot:
4. Klicken Sie dann mit der rechten Maustaste auf eine ausgewählte Spaltenüberschrift und wählen Sie Verbergen um diese ausgewählten Spalten nach Bedarf auszublenden. Siehe Screenshot:
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!