vorheriges aktives Tabellenblatt aufrufen geschlossen

[vipcs]

Hallo Leute,

ich habe ein Problem und komme nicht weiter. In einer Datei mit vielen Blättern sollen die Anwender die Möglichkeit haben nach dem Wechsel in ein anderes Blatt, aus diesem wieder in das vorherige zurück zu springen. Das entsprechende Blatt kann also immer ein anderes sein, je nachdem von welchem der jeweilige Anwender eben "gewechselt" hat.
Kann man dies über ein VBA Makro realisieren?

Greetz

vipcs:read:

 

[Tattooed1980]

Hy

Kann man

Folgenden Code in jedes Tabellenblatt einfügen:

Sub Worksheet_DeActivate()
' Den Blattnamen beim Verlassen des Blattes speichern 
Vorher = Me.Name
End Sub

Folgenden Code in ein "Modul" einfügen:

Public Vorher As String
Sub Back()
' Das letzte gespeicherte Tabellenblatt aufrufen 
If Vorher <> "" Then Worksheets(Vorher).Activate
Vorher = ""
End Sub

MfG Tattooed1980

 

[vipcs]

Ein super herzliches Dankeschön für die Lösung. Funktioniert super.

MfG

vipcs:read:

- closed -