Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Nur Tage des aktuellen Monats anzeigen

Nur Tage des aktuellen Monats anzeigen
Burghard
Hallo,
ich habe eine Tabelle in der in Spalte B die einzelnen Tage des ganzen Jahres fortlaufend vorhanden sind.
Ich möchte gerne nur die Tage (bzw. die jeweils ganzen Zeilen) des aktuellen Monats sichtbar angezeigt bekommen. Die anderen Zeilen außerhalb des aktuellen Monats sollen ausgeblendet sein (bis auf die Zeile 1 = Überschrift).
Hilfe wäre nett.
Schönen Gruß
Burghard
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
Autofilter!
11.04.2012 13:23:01
Sheldon
Hallo Burghard,
setze einfach einen Autofilter auf die Überschriftszeile, darin kannst du dann einen benutzerdefinierten Filter festlegen mit ist kleiner oder gleich z.B. 30.04.2012 und ist größer oder gleich 01.04.2012.
Gruß
Sheldon
AW: Danke
11.04.2012 13:58:55
Burghard
Hallo Sheldon,
danke für den Tipp!
Schönen Gruß
Burghard
Anzeige
AW: Nur Tage des aktuellen Monats anzeigen
11.04.2012 13:29:17
Martin
Hallo Burghard,
ich vermute, dass du keine VBA-Lösung sucht. Ich würde an deiner Stelle Spalte B Markieren und im Menü auf "Daten", "Filter" und "AutoFilter" gehen. Auf dem Pfeil klickst du auf "Benutzerdefiniert" und gibt den gewünschten Zeitraum an:
Userbild
Viele Grüße
Martin
Anzeige
AW: Danke
11.04.2012 13:59:48
Burghard
Hallo Martin,
danke für den Tipp!
Schönen Gruß
Burghard
AW: Nur Tage des aktuellen Monats anzeigen
11.04.2012 13:31:53
Dieter
Hallo Burghard,
du kannst das mit der folgenden VBA-Prozedur machen:
Private Sub Workbook_Open()
Dim aktMonat As Long
Dim letzteZeile As Long
Dim ws As Worksheet
Dim zeile As Long
aktMonat = Month(Date)
Set ws = ThisWorkbook.Worksheets(1)
letzteZeile = ws.Cells(ws.Rows.Count, "B").End(xlUp).Row
Application.ScreenUpdating = False
For zeile = 1 To letzteZeile
If IsDate(ws.Cells(zeile, "B")) Then
If Month(ws.Cells(zeile, "B")) = aktMonat Then
ws.Rows(zeile).Hidden = False
Else
ws.Rows(zeile).Hidden = True
End If
End If
Next zeile
Application.ScreenUpdating = True
End Sub
Die Prozedur kommt in "DieseArbeitsmappe".
Viele Grüße
Dieter
Anzeige
AW: Geht prima!
11.04.2012 14:01:10
Burghard
Hallo Dieter,
vielen Dank für die VBA-Lösung. Ist für mich der einfachste Weg. Klappt prima!
Schönen Gruß
Burghard

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Nur Tage des aktuellen Monats anzeigen in Excel


Schritt-für-Schritt-Anleitung

Um in Excel nur die Tage des aktuellen Monats anzuzeigen, kannst du entweder einen Autofilter verwenden oder eine VBA-Lösung implementieren. Hier sind beide Methoden:

1. Autofilter verwenden:

  • Markiere die Überschrift deiner Datenspalte (z. B. Spalte B).
  • Gehe im Menü auf „Daten“ und wähle „Filter“ und anschließend „AutoFilter“.
  • Klicke auf den Filterpfeil in der Überschrift und wähle „Benutzerdefiniert“.
  • Setze die Bedingungen: Wähle „ist kleiner oder gleich“ und gib das Datum des letzten Tages des aktuellen Monats ein (z. B. 30.04.2023) und „ist größer oder gleich“ und gib den ersten Tag des Monats ein (z. B. 01.04.2023).

2. VBA-Prozedur verwenden:

  • Öffne den VBA-Editor mit ALT + F11.
  • Wähle „DieseArbeitsmappe“ im Projektfenster aus.
  • Füge den folgenden Code ein:
Private Sub Workbook_Open()
    Dim aktMonat As Long
    Dim letzteZeile As Long
    Dim ws As Worksheet
    Dim zeile As Long
    aktMonat = Month(Date)
    Set ws = ThisWorkbook.Worksheets(1)
    letzteZeile = ws.Cells(ws.Rows.Count, "B").End(xlUp).Row
    Application.ScreenUpdating = False
    For zeile = 1 To letzteZeile
        If IsDate(ws.Cells(zeile, "B")) Then
            If Month(ws.Cells(zeile, "B")) = aktMonat Then
                ws.Rows(zeile).Hidden = False
            Else
                ws.Rows(zeile).Hidden = True
            End If
        End If
    Next zeile
    Application.ScreenUpdating = True
End Sub
  • Schließe den VBA-Editor und speichere die Datei als „Excel-Makro-fähige Arbeitsmappe“ (*.xlsm).

Häufige Fehler und Lösungen

  • Fehler: Autofilter zeigt nicht die gewünschten Daten an.

    • Lösung: Überprüfe, ob du die Filterkriterien korrekt eingegeben hast. Achte auf das Datumsformat in deiner Tabelle.
  • Fehler: VBA-Code funktioniert nicht.

    • Lösung: Stelle sicher, dass der Code in „DieseArbeitsmappe“ eingefügt wurde und die Arbeitsmappe als *.xlsm gespeichert ist.

Alternative Methoden

Neben dem Autofilter und der VBA-Lösung gibt es auch die Möglichkeit, die Funktion EOMONTH zu nutzen, um das Ende des aktuellen Monats zu bestimmen. Du kannst eine neue Spalte anlegen, die überprüft, ob das Datum im aktuellen Monat liegt.

=UND(B1>=DATUM(JAHR(HEUTE()), MONAT(HEUTE()), 1), B1<=EOMONTH(HEUTE(), 0))

Diese Formel gibt „WAHR“ zurück, wenn das Datum in B1 im aktuellen Monat liegt.


Praktische Beispiele

Wenn du alle Tage eines Monats in Excel auflisten möchtest, kannst du mit der folgenden Formel in Zelle B1 beginnen:

=DATUM(JAHR(HEUTE()), MONAT(HEUTE()), 1) + ZEILE()-1

Zieht die Formel bis zum 31. des Monats nach unten. Diese Methode ist nützlich, um Excel Tage eines Monats aufzulisten.


Tipps für Profis

  • Nutze die Datenüberprüfung, um sicherzustellen, dass nur gültige Datumswerte in die Spalte eingegeben werden.
  • Erstelle eine benutzerdefinierte Ansicht, um zwischen verschiedenen Monatsansichten zu wechseln, ohne die Filter jedes Mal neu einstellen zu müssen.
  • Verwende bedingte Formatierung, um die Tage des aktuellen Monats hervorzuheben.

FAQ: Häufige Fragen

1. Wie kann ich alle Tage in Excel als Datum in einem bestimmten Monat auflisten? Du kannst dies mit einer Formel tun, die das Datum des ersten Tages des Monats und die Funktion ZEILE() kombiniert.

2. Funktioniert das auch in älteren Excel-Versionen? Ja, die beschriebenen Methoden funktionieren in Excel 2010 und neueren Versionen. Die VBA-Lösung sollte ebenfalls in diesen Versionen anwendbar sein.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige