Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
696to700
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
696to700
696to700
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Tabelle ein und ausblenden

Tabelle ein und ausblenden
19.11.2005 19:32:40
Petra
Hallo Forum,
habe eine Frage zu TB. ein oder ausblenden. Ich habe eine Datei für mehrere Jahre erstellt, nun möchte ich die TB. ausblenden und erst wider autom. einblenden wenn das z.Bsp. Jahr 2007 ereicht wurde. Wenn es den geht mit VBA das zu lösen wie müsste dan der Code für die TB. " Plan 2007 " ausehen.
Gruss Petra

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabelle ein und ausblenden
19.11.2005 19:38:42
andreas
Hallo Petra,
wie wäre es etwa so?

Private Sub Workbook_Open()
For i = 1 To ActiveWorkbook.Sheets.Count
If InStr(Sheets(i).Name, Year(Date)) Then
Sheets(i).Visible = True
End If
Next
End Sub

gruß
Andreas E
AW: Tabelle ein und ausblenden
19.11.2005 19:39:05
PeterW
Hallo Petra,
mit
Year(Date) ermittelst du das aktuelle Jahr. Denkbar wäre

Private Sub Workbook_Open()
If Year(Date) = 2007 Then
Sheets("DeinBlatt").Visible = True
End If
End Sub

in das Modul DieseArbeitsnmappe kopieren.
Gruß
Peter
AW: Danke euch beiden
19.11.2005 19:49:26
Petra
Hallo Danke euch beiden für die Blitzantwort.
Gruss Petra u. e. schönes W.E.
Anzeige

305 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige