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

Letztes aktives Sheet wieder aktivieren

Letztes aktives Sheet wieder aktivieren
21.08.2003 13:33:04
Rolf
Hi Folks,

Situation: Mehrere Tabellen, Schaltfläche auf jeder Tabelle eine Schaltfläche "Spring zu Tabelle "Schicht", auf Tabelle "Schicht" Ein Button "Zurück".

Dort beginnt mein Problem. Wie geht es, dass bei drücken des "Zurück"-Schalters die letzte, geöffnete Tabelle wieder angesprochen wird?

Beispiel:

Von "Tabelle 1" per Schaltfläche auf Tabelle "Schicht" gesprungen
Auf Tabelle "Schicht" soll per Schaltfläche "Zurück" wieder auf "Tabelle 1" gesprungen werden.


Von "Tabelle 5" per Schaltfläche auf Tabelle "Schicht" gesprungen
Auf Tabelle "Schicht" soll per Schaltfläche "Zurück" wieder auf "Tabelle 5" gesprungen werden.


Danke für eure Ideen und Gedankengänge...

Rolf

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

Betreff
Datum
Anwender
Anzeige
AW: Letztes aktives Sheet wieder aktivieren
21.08.2003 13:41:15
Dieter Maj
Hallo Rolf
poste mal deine Datei, erklären ist ein bischen schwierig, ist aber gleich gemacht
Gruß Dieter


AW: Letztes aktives Sheet wieder aktivieren
21.08.2003 13:45:21
Schneebär
Hallo Rolf,

so als Idee: vor dem Springen den Namen des aktuellen Sheets in Variable abspeichern
ws=ActiveSheet.Name ---Sprung zu Schicht----Zurück-> Sheets(ws).activate

Viele Grüße

Sabine


AW: Letztes aktives Sheet wieder aktivieren
21.08.2003 13:48:10
WernerB.
Hallo Rolf,

schreibe in Deinem Modul noch vor dem ersten Makro

Public BlaNa as String

In allen Makros, die zu einem anderen Blatt springen, noch vor der Blattwechsel-Anweisung:

BlaNa = ActiveSheet.Name

und in dem Zurück-Makro:

Sheets(BlaNa).Select


Ich habe es nicht getestet, sollte aber so funzen.


Viel Erfolg wünscht
WernerB.


Anzeige
Danke an alle!!! :-)) o.T.
21.08.2003 14:49:08
Rolf
.


Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige