Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
364to368
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
364to368
364to368
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

SheetName

SheetName
17.01.2004 19:23:48
Lorenz K.
Hallo Helfende!
Wie kann man mittels Code beim Ereignis WorkBook_Open od. WorkBook_Activate
Tabellenblätter die "1.", "2.", "3." bis "31." heissen mit aktuellem Datum heute()
auswählen.
z.B. Heute ist der 17., somit soll das Sheet mit SheetName ="17." ausgewählt (aktiviert werden).
zusätzlich soll Abfrage ob es überhaupt eingeblendet ist so ähnlich wie :
IF Sheet ("17.").Visible = False Then Exit Sub

Danke im Voraus Lorenz K.

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: SheetName
17.01.2004 19:27:51
Ramses
Hallo Lorenz
probier mal
If Worksheets(Day(Now) & ".").Visible = False Then
Exit sub
else
Worksheets(Day(Now) & ".").Select
End If
Ist zwar ungetestet, sollte aber tun
Gruss Rainer
AW: SheetName
17.01.2004 19:32:42
Lorenz K.
Hallo Rainer!
wurde sofort meinerseits getestet!
Funktioniert!
Danke u Gruss Lorenz
Merci :-)) Geschlossen o.T.
17.01.2004 19:35:28
Ramses
...
AW: SheetName
17.01.2004 19:30:50
Ulf
Sheets(CStr(day(date))).select
Ulf

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige