Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

zurück zum letzten Tabellenblatt

zurück zum letzten Tabellenblatt
13.01.2009 16:02:00
Zeller
ich benötige eine Programmierung welche es mir erlaubt immer zum zuletzt angwählten Tabellenblatt in Excel zurückspringen kann.
Durch einen Link auf einem Tabellenblatt springe ich auf verschiedene Diagramme, alle Diagramme sind auf einem anderen Tabellenblatt. Nun möchte ich aber ganz einfach wieder auf das Tabellenblatt springen von welchem der Link angwählt wurde.
Besten Dank für eure Hilfe.
Mfg
Daniel Zeller

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: zurück zum letzten Tabellenblatt
13.01.2009 16:25:24
Tino
Hallo,
kannst Du die Taste F12 entbehren?
Nach dem Du die Mappe neu öffnest bzw. neu aktivierst, kannst Du die Taste F12 dafür nutzen
um immer ins letzte Worksheet zu wechseln. (Diagramme habe ich ausgeschlossen)
kommt als Code in DieseArbeitsmappe
Option Explicit 
 
 
Private Sub Workbook_Activate() 
Application.OnKey "{F12}", "LetzteTabelleSelect" 
End Sub 
 
Private Sub Workbook_Deactivate() 
Application.OnKey "{F12}" 
End Sub 
 
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object) 
 If TypeName(Sh) = "Worksheet" Then 
  Set LetzteTabelle = Sh 
 End If 
End Sub 

kommt in ein Modul

Option Explicit 
Public LetzteTabelle As Worksheet 
 
Sub LetzteTabelleSelect() 
If Not LetzteTabelle Is Nothing Then 
 LetzteTabelle.Select 
End If 
End Sub 


Gruß Tino

Anzeige
AW: zurück zum letzten Tabellenblatt
14.01.2009 10:46:37
Zeller
Besten Dank,
ich habe den Vorschlag in ein Modul einkopiert. Dies funktioniert soweit, allerdings wird folgende Meldung angezeigt - als Hinweis:
Die angegebene Datei konnte nicht geöffnet werden.
Wie kann ich ihn umgehen?
Besten Dank
Mfg
Daniel Zeller

198 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige