Microsoft Excel

Herbers Excel/VBA-Archiv

Datum in Tabellenblättern suchen

Betrifft: Datum in Tabellenblättern suchen von: Harald G.
Geschrieben am: 31.07.2014 09:41:29

Private Sub Workbook_Open()

Guten Tag,

ich habe eine Anwesenheitsliste für Mitarbeiter.
Für jeden Monat gibt es ein Tabellenblatt.
Das Datum steht jweils in den Zellen I8:AM8.

Mein Ziel:

Beim Öffnen der Datei soll automatisch das Tagesdatum in den Tabellenblättern "Januar" bis "Dezember" und "Januar Folgejahr" im Zellbereich I8:AM8 gesucht werden und genau dieses Tabellenblatt angezeigt werden (="activate"?).

Zusatzinfo (um im Vorfeld ein eventuelles Problem mit zu berücksichtigen):
Das Datum im Zellbereich I8:AM8 ist kein Wert, sondern eine Formel, welche sich den Datumswert aus einer anderen Datei holt.

Der Mitarbeiter, der die Datei öffnet soll also automatisch das Tabellenblatt mit dem aktuellen Monat angezeigt bekommen.

Kann mir jemand den Code nennen?

Vielen Dank im vorraus

Harald G.

  

Betrifft: Rückfragen von: Erich G.
Geschrieben am: 31.07.2014 10:13:17

Hi Harald,
deine Frage verstehe ich so nicht wirklich.
Wenn wir uns heute im Juli befinden, soll dann nicht einfach das Blatt "Juli" anzezeigt werden?

Das ginge mit
Sheets(Format(Date,"MMMM")).Select
und ohne nach einem Datum suchen zu müssen. Warum sollte man im November nach einem Juli-Datum suchen?

Noch eine Frage:
Wenn der 5. Januar ist - wann passte das Blatt "Januar" und wann das Blatt "Januar Folgejahr"?

Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich


  

Betrifft: AW: Rückfragen - Problem behoben - DANKE von: Harald G.
Geschrieben am: 31.07.2014 11:23:57

Hallo Erich,

das die Lösung so einfach ist, hatte ich nicht gedacht.
Funktioniert toll.

Ja, wenn man im Juli ist soll auch Juli angezeigt werden.
Das Tabellenblatt. "Januar Folgejahr" ist nur für die Anwesenheitsplanung zum Jahreswechsels Vorfeld.
Es besteht also kein Problem, weil man im laufenden jahr nur manuell zu diesem Tabellenblatt wechselt. Zu Jahresbeginn gibt es ja immer eine neue Datei.

Vielen Dank und Grüße aus Köln

Harald


 

Beiträge aus den Excel-Beispielen zum Thema "Datum in Tabellenblättern suchen"