[b]Option Explicit
Private Sub Workbook_Open()
StrLastSheetName = ActiveSheet.Name
StrSheetName = ActiveSheet.Name
End Sub
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
StrLastSheetName = StrSheetName
StrSheetName = ActiveSheet.Name
End Sub
[/b][b]Option Explicit
Public StrSheetName As String
Public StrLastSheetName As String
Sub Last_Sheet()
Sheets(StrLastSheetName).Activate
End Sub
[/b]
Übertrag von Tabellenblätter in Excel
gast10 06.07.2007 - 70 Hits - 2 Antworten
Springen bei Excel
Toby89Excel 18.09.2007 - 46 Hits - 2 Antworten
"Status" Tabellenname - Tabelle???
Tomschi 04.10.2007 - 28 Hits - 7 Antworten
Daten nur in bestimmtes Tabellenblatt übernehmen wenn eine Zelle ungleich 0
HeideK 19.02.2008 - 47 Hits - 1 Antwort
Über Buttons von einem Tabellenblatt ins nächste springen
Anne261179 02.06.2008 - 52 Hits - 2 Antworten