[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 - 71 Hits - 2 Antworten
Springen bei Excel
Toby89Excel 18.09.2007 - 48 Hits - 2 Antworten
"Status" Tabellenname - Tabelle???
Tomschi 04.10.2007 - 29 Hits - 7 Antworten
Daten nur in bestimmtes Tabellenblatt übernehmen wenn eine Zelle ungleich 0
HeideK 19.02.2008 - 49 Hits - 1 Antwort
Über Buttons von einem Tabellenblatt ins nächste springen
Anne261179 02.06.2008 - 53 Hits - 2 Antworten