Hallo,
ich hab mal wieder ne einfache Frage
Und zwar habe ich eine Datei erstellt in der zwischen Tabellenblättern hin und her gesprungen werden kann und diese je nachdem sichtbar und nicht sichtbar sind.
Ist man nun im Diagrammblatt und schließt die Datei und speichert, funktioniert beim nächsten Öffnen mein Makro nicht mehr, da das Diagrammblatt beim Öffnen nicht sichtbar ist und man es nur über einen Button anwählen kann...
Wer kann mir helfen, dass auch beim Speichern das Tabellenblatt "GESAMT" angewählt wird
Sub auto_open()
Sheets("GESAMT").Activate
ThisWorkbook.Unprotect "qs"
ActiveWindow.WindowState = xlMaximized
DoEvents
MsgBox "Bitte wählen Sie den Monat und den" & Chr(13) & "PC-Verantwortlichen aus!", vbOKOnly
Range("b6").Activate
If Sheets("Diagramm").Visible = True Then Sheets("Diagramm").Visible = False
ThisWorkbook.Protect Password:="qs", structure:=True, Windows:=True
End Sub
ich hab mal wieder ne einfache Frage
Und zwar habe ich eine Datei erstellt in der zwischen Tabellenblättern hin und her gesprungen werden kann und diese je nachdem sichtbar und nicht sichtbar sind.
Ist man nun im Diagrammblatt und schließt die Datei und speichert, funktioniert beim nächsten Öffnen mein Makro nicht mehr, da das Diagrammblatt beim Öffnen nicht sichtbar ist und man es nur über einen Button anwählen kann...
Wer kann mir helfen, dass auch beim Speichern das Tabellenblatt "GESAMT" angewählt wird
Sub auto_open()
Sheets("GESAMT").Activate
ThisWorkbook.Unprotect "qs"
ActiveWindow.WindowState = xlMaximized
DoEvents
MsgBox "Bitte wählen Sie den Monat und den" & Chr(13) & "PC-Verantwortlichen aus!", vbOKOnly
Range("b6").Activate
If Sheets("Diagramm").Visible = True Then Sheets("Diagramm").Visible = False
ThisWorkbook.Protect Password:="qs", structure:=True, Windows:=True
End Sub
