Clever-Excel-Forum

Normale Version: Zurück zur zuletzt angewählten Tabelle möglich?
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
hi,

kann ich zur zuletzt angewählten Tabelle springen?

Es gibt ja:

Sheets("Tabelle1").Select
und
ActiveSheet.Previous.Select

Wenn ich nun auf Tabelle3 bin und auf Tabelle1 springe mit obigen Befehl, dann kann ich nicht einfachh wieder zurück zu vorher ausgewählten Tabelle 3 springen, sondern ich muss es genau sagen: Seets("Tabelle3").Select

Wenn jetzt z.B eine Erklärung für alle Tabellen auf Tabelle 1 liegt und ich dann von allen Tabellen zu ihr springe ist das ja soweit so gut. Wenn ich allerdings dann wieder zurücspringen möchte, müsste ich zig Buttons in Tabelle 1 einfügen. Springe zu Sheet 3, Springe zu Sheet 12 etc.
Ist viel zu voll.

Ich könnte auch 30x Tabelle1(Tabelle1von2, Tabelle1von3, etc.) anlegen, also kopieren, die ist ja immer identisch. Und dann jeweils nur einen Button anlegen, wohin man zurückpringt.

Aber geht das auch einfacher, mit so etwas wie: wähle die zuletzt angewählte Sheet ab?
Sheets().Select sind nicht im Clipboard. Somit sind sie gedächtnislos. Anstelle mit verschiedenen Sheets arbeitet man besser mit Werteänderungen einer Zelle, die ein Sheet anders aussehen lassen. Und Werteänderungen kann Clipboard.
Hm, schade. Die Tabellenn sind optisch und wertemässig vollkommen anders aufgebaut. Mit Werteänderungen komme ich da nicht weit.
...und warum "merkst" du dir die zuletzt benutzte Tabelle nicht in einer Variablen beim Sprung auf Tabelle1, die du dann zum Rücksprung auslesen und verwenden kannst?
Ach jo, gute Idee!

Aber wie schreibe ich denn in eine Tabelle X in Feld A1 den aktive Tabelle hinein?
Hi

Schau dir die möglichen Ereignisse an die ein Tabellenblatt kennt. Du brauchst Deactivate. 
Blatt verlassen -> Namen merken.

Gruß Elex
[Deactivate] ... den Blattnamen hängt man mit einem Trenner an bisherige Namen an. Klickt man nun ein neues Blatt an, wird weiter angehängt; drückt man statt dessen eine benDef Tastenkombi (analog zu Strg-Z), wird der letzte Name der Kette als Blattname angesprungen und gelöscht. 

Die Aufbewahrung kann man in einer Zelle oder in einem benDef Namen machen.
Hallo,

siehe Beispielmappe:

[attachment=49752]

Gruß, Uwe
Heftig, mein Code war mindestens 5x so viel - dazu auch noch ein Feld in einer Tabelle reserviert. Funktioniert bestens! Danke!!

Google findet nicht einmal Infos darüber was oWS ist/macht.
Moin,

oWS wird der selbst vergebene Name einer Variablen sein. Da wird Google natürlich nicht fündig. Aber vielleicht bietet es sich an, dass du dir selbst Grundkenntnisse in VBA verschaffst.
Viele Grüße
derHöpp