Benötige vba code automatisch öffnen workbooks erste seite anzeigt

Wenn man das Workbook schließt, kann es sein, dass man auf Sheet 3 oder 4 das schließt. Beim nächsten Öffnen soll dann aber immer wieder das erste Sheet angezeigt werden.

1 Antworten zur Frage

Bewertung: 2 von 10 mit 1413 Stimmen

Videos zum Thema
YouTube Videos

Ich benötige einen VBA-Code, der automatisch bei jedem Öffnen des Workbooks die erste Seite anzeigt.

dafür musst du in den VBA-Editor und dort einen Doppelklick auf "Diese Arbeitsmappe" machen.
Dann hast du oben rechts zwei Auswahlfelder, bei dem Ersten klickst du "Workbook" an und bei dem Zweiten erscheint automatisch "Open" - dies ist korrekt.
Folgender Code wird automatisch generiert:
"Private Sub Workbook_Open()
End Sub"
da schreibst du folgendes rein:
Tabelle1.Select
"Tabelle1" ist der Name, den du links unter "DieseArbeitsmappe" siehst.
alternativ kannst du auch folgenden Code schreiben:
Sheets("Name_des_Blatts").S elect
Wichtig ist, dass du als.xlsm abspeicherst - ggfs. kannst du in den Einstellungen auch Excel mitteilen, dass Makros generell aktiviert werden sollen, um dies nicht bei jedem Start zu tun - wenn du aber auch mal fremde Dateien hast, würde ich aus Sicherheitsgründen davon abraten.
Ich hoffe, dass dies verständlich war
vielleicht als kleine Ergänzung:
Tabelle1 nimmt man, damit bei Änderung des Blattnamens immer noch die gleiche Tabelle ausgewählt wird; wird diese Blatt aber gelöscht, kommt es zu einem Fehler, da Tabelle1 nicht ausgewählt werden kann.
Den Namen des Blatts verwendet man, wenn man der Übersichtlichkeit halber den Namen direkt im Code haben möchte; wird das Blatt gelöscht und ein neues mit dem gleichen Namen angelegt, wird nun dieses ausgewählt.
nun sprach ich gerade von Fehlern:
es ist u.U. sinnvoll, eine Fehlerbehandlung einzubauen:
Private Sub Workbook_Open("das angeforderter Tabellenblatt existiert nicht.")
End Sub