Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 14:48:50
"Eingabefeld" zwischen zwei Zeilen geht nicht weg.
24.04.2024 14:40:10
Zeilenumbrüche in Textbox zählen
24.04.2024 14:06:20
Gesamte Column löschen, wenn Column-Bereich leer
24.04.2024 13:44:05
Bezeichnung Tabellenblatt aus Zelle für Formel auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
120to124
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
120to124
120to124
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mittels Makro beim Öffnen zu best. Monat wechseln

Mittels Makro beim Öffnen zu best. Monat wechseln
14.05.2002 08:06:06
Schulz J.
Hallo!
Habe mir über Excel eine Urlaubsliste angelegt.
Nun meine Frage dazu:
Besteht die Möglichkeit, beim Öffnen der Tabelle mit einem Modul/Makro zum aktuellen Monat zu wechseln?
Habe ein ganzes Jahr in eine Tabelle gelegt(Monate untereinander)
Vielleicht kann mir jemand weiterhelfen.

Danke im voraus.

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Mittels Makro beim Öffnen zu best. Monat wechseln
14.05.2002 09:09:32
andré
Private Sub Workbook_Open()

End Sub

wenn du mit der obenstehenden Sub nimmst und darin dann denn entsprechenden Monat (zelle) aktivierst, sollte es klappen.

TrY aNd ErRoR

Re: Mittels Makro beim Öffnen zu best. Monat wechseln
14.05.2002 10:35:46
Schulz J.
Hallo!
Wollte es so machen!
Sub auto_open()
Sheets("Urlaubsplan").Select
Application.DisplayFullScreen = False
Application.DisplayFormulaBar = False
If Range("Eintrag!U1") = 1 Then Call gehe_jan
If Range("Eintrag!U1") = 2 Then Call gehe_feb
If Range("Eintrag!U1") = 3 Then Call gehe_mar
If Range("Eintrag!U1") = 4 Then Call gehe_apr
If Range("Eintrag!U1") = 5 Then Call gehe_mai
If Range("Eintrag!U1") = 6 Then Call gehe_jun
If Range("Eintrag!U1") = 7 Then Call gehe_jul
If Range("Eintrag!U1") = 8 Then Call gehe_aug
If Range("Eintrag!U1") = 9 Then Call gehe_sep
If Range("Eintrag!U1") = 10 Then Call gehe_okt
If Range("Eintrag!U1") = 11 Then Call gehe_nov
If Range("Eintrag!U1") = 12 Then Call gehe_dez
End Sub
Im Eintrag U1 steht der aktuelle Monat.
Mit den gehe_... komme ich direkt zur Monatsansicht.
(Hat mein Vorgänger gemacht)
Bin auch nicht gerade ein VBA-Experte
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige