Office: (Office 2013) Tabellenblatt per Timer ausblenden

Hallo zusammen,

in meinem Excel Sheet ist ein Command Button, mit dem ich ein ausgeblendetes Tabellenblatt einblenden kann. Code sieht so aus:

Private Sub CommandButton1_Click()
ThisWorkbook.Sheets("Zusatzinfos").Visible = xlSheetVisible
End Sub

Gibt es eine Möglichkeit per Timer das Blatt z.b. nach 20 Sekunden automatisch wieder auszublenden?

Grüße Fabi

:)

 

ja ontime





Meine Homepage Homeseite - Hajo's Excelseiten

 

ich habe es jetzt ein wenig versucht aber es leider nicht hinbekommen.

Könntest du mir vlt mit einem kleinen Beispielcode weiterhelfen?

 

dazu kann ich nichts schreiben, was wohl daran liegt das ich nicht auf fremde Rechner schaue und ich baue keine Datei nach.

Vielleicht sollte die Datei verlinkt werden?

Benutze hier im Forum die Funktion zum hochladen. Falls Du die nicht benutzen möchtest beachte, von unsicheren Servern wie z.B. www.file-upload.net lade ich keine Datei runter. (lt. Einschätzung meines Virenprogramms)
Der Name einer hochgeladenen Mappe wird im Beitrag automatisch angezeigt, sodass es bei Verwendung von aussagekräftigen Namen leichter fällt, sie später im Ablageordner wiederzufinden und sie gedanklich einem bestimmten Thema zuzuordnen. Namen wie Muster*, Test*, Mappe*, Beispiel*, Fehler*, Kalender*, UserForm* usw. sind so allgemein, dass eine Zuordnung zu einem Thema unmöglich gemacht wird.
Es sollte ein aussagekräftiger Name sein.
Das ist nur meine Meinung zu dem Thema.

Code:

Meine Homepage Homeseite - Hajo's Excelseiten

 

\@HajoZi: Dein Code dürfte nicht funktionieren, da davon auszugehen ist, dass
der Code des Command-Button in einem Tabellen-Modul liegt. Wenn nicht,
funktioniert der Code natürlich.

 

Hallo Fabi,

1. Deinen bisherigen Code ergänzen
Code:

2. Nachstehenden Code in einen allgemeinen Modul einfügen.
Code:

Gruß
Aloys

 

Also hier ist die Beispieldatei.

Das einblenden des versteckten Tabellenblattes klappt.
Es soll sich "nur" nach 20 Sekunden automatisch wieder ausblenden.

Mit deinem Code habe ich es leider nicht hinbekommen.

 

ich arbeite nicht für den papiekorb und bin darum raus.





Meine Homepage Homeseite - Hajo's Excelseiten

 

Hallo,

...mit wessen Code ...*confused.gif* ?? Der von Aloys sollte flutschen...*cool.gif*

Gruß, Muller2

 

\@hajo wieso sollte das für den Papierkorb sein?


@Aloys Danke für den Code. Hat super geklappt *Smilie