Workbooks("OriginalTelefonverzeichnisIntern.xls").Activate
ActiveWindow.SelectedSheets("TBROriginal").Select
Ich bin für jeden Rat dankbar.
Um mit VBA eine Excel-Datei zu öffnen und zwischen den Registerkarten zu wechseln, kannst du folgenden VBA-Code verwenden:
Sub DateiUndRegisterWechseln()
' Die gewünschte Datei aktivieren
Workbooks("OriginalTelefonverzeichnisIntern.xls").Activate
' Wechsel zur gewünschten Registerkarte
Sheets("TBROriginal").Select
End Sub
Dieser Code aktiviert die Excel-Datei und wechselt direkt zur Registerkarte "TBROriginal". Stelle sicher, dass die Datei bereits geöffnet ist, da der Code nur darauf zugreift.
Die Datei ist nicht geöffnet
Falscher Blattname
Syntaxfehler
End Sub
kann den gesamten Code zum Absturz bringen.Wenn du die Datei nicht aktivieren möchtest, um zwischen den Registern zu wechseln, kannst du auch diesen Ansatz verwenden:
Sub DateiUndRegisterWechselnAlternative()
Dim wb As Workbook
' Die Datei öffnen
Set wb = Workbooks.Open("C:\Pfad\zu\deiner\Datei\OriginalTelefonverzeichnisIntern.xls")
' Wechsel zur gewünschten Registerkarte
wb.Sheets("TBROriginal").Activate
End Sub
Diese Methode öffnet die Datei und wechselt direkt zur gewünschten Registerkarte, ohne dass die Datei vorher geöffnet sein muss.
Hier sind einige praktische Beispiele, wie du verschiedene Excel-Dateien und Registerkarten in VBA öffnen und wechseln kannst:
Sub Beispiel1()
Workbooks.Open "C:\Pfad\zu\deiner\Datei\Beispiel.xls"
Sheets("Daten").Select
End Sub
Sub Beispiel2()
Workbooks.Open "C:\Pfad\zu\deiner\Datei\Datei1.xls"
Workbooks.Open "C:\Pfad\zu\deiner\Datei\Datei2.xls"
' Wechsel zur Registerkarte in Datei1
Workbooks("Datei1.xls").Sheets("TBROriginal").Select
End Sub
Nutze Workbook
- und Worksheet
-Objekte, um deinen Code lesbarer und wartungsfreundlicher zu gestalten.
Verwende On Error Resume Next
, um Fehler während des Öffnens oder Aktivierens der Dateien zu vermeiden, und implementiere ein Fehlerhandling, um den Benutzer über Probleme zu informieren.
Wenn du häufig wechselst, speichere die Referenzen der Arbeitsmappen in Variablen, um die Leistung zu verbessern.
1. Wie kann ich sicherstellen, dass die Datei bereits geöffnet ist?
Du kannst eine Schleife verwenden, um zu überprüfen, ob die Datei geöffnet ist, bevor du versuchst, sie zu aktivieren.
2. Was kann ich tun, wenn das Registerblatt nicht existiert?
Stelle sicher, dass der Name der Registerkarte exakt übereinstimmt. Du kannst alle vorhandenen Registerkarten auflisten und den Namen überprüfen, um Fehler zu vermeiden.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen