vor einigen Tagen hatte ich zwei Beiträge gestellt, bei den mir wirklich geholfen wurde.
jetzt stellt sich bei leider die Frage wie ich unterschiedliche Variablen definiere... ich glaub hier kommt Excel irgendwie durcheinander, weil ich diese falsch definiere bzw. gar nicht - ich muss gestehen, dass ich noch nicht so richtig weiß, wie dies funktioniert.
zum einen möchte ich meine vorherige Seite aufrufen-egal auf welcher Seite dies passiert, hierfür habe ich diesen Code bekommen der alleine auch super funktioniert:
Option Explicit
Public OldSheet As String
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
OldSheet = Sh.Name
End Sub
Sub VorherSheet()
On Error Resume Next
Sheets(OldSheet).Activate
End Sub
und dann gibt es noch eine zweite "Aufgabe" die auch verschiedene variable Tabellenblätter aufruft bzw. schließt:
Option Explicit
Private Sub Workbook_Open()
On Local Error GoTo fehlerERR
If Left(ActiveSheet.Name, 5) = "M_FL_Ber" Then
Set wsZiel = ActiveSheet
End If
If InStr(ActiveSheet.Name, "Hyd_") > 0 Or InStr(ActiveSheet.Name, "AF_") > 0 Then
Set wsStart = ActiveSheet
End If
fehlerOUT:
Exit Sub
fehlerERR:
Resume fehlerOUT
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
On Local Error GoTo fehlerERR
If Left(Sh.Name, 5) = "M_FL_Ber" Then
Set wsZiel = Sh
End If
If InStr(Sh.Name, "Hyd_") > 0 Or InStr(Sh.Name, "AF_") > 0 Then
Set wsStart = Sh
End If
fehlerOUT:
Exit Sub
fehlerERR:
Resume fehlerOUT
End Sub
auch der funktionierte alleine super... aber zusammen funktioniert nix mehr.
Wenn ich hierzu vielleicht eine Erklärung bekommen könnte, was ich falsche gemacht habe, wäre ich euch mal wieder sehr dankbar, damit ich das Sieben-Siegel-variablen -Buch irgendwann mal alleine öffnen kann...
VG
Sandra