Inhalt von einer Zelle als Arbeitsblattnamen verwenden
Schritt-für-Schritt-Anleitung
Um den Inhalt einer Zelle als Arbeitsblattnamen in Excel zu verwenden, kannst Du den folgenden VBA-Code verwenden. Dieser Code wird in das Modul des Arbeitsblattes eingefügt, welches den Zellinhalt überwacht.
- Öffne Excel und gehe zu dem Arbeitsblatt "Eingabe".
- Drücke
ALT + F11, um den VBA-Editor zu öffnen.
- Doppelklicke im Projekt-Explorer auf "Eingabe", um das entsprechende Modul zu öffnen.
- Füge den folgenden Code ein:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Address = "$F$3" Then
If SheetExist(Target) Then
Worksheets(Target.Value).Activate
End If
End If
End Sub
Private Function SheetExist(ByVal sheetName As String, Optional Wb As Workbook) As Boolean
Dim wks As Worksheet
On Error GoTo ERRORHANDLER
If Wb Is Nothing Then Set Wb = ThisWorkbook
For Each wks In Wb.Worksheets
If LCase(wks.Name) = LCase(sheetName) Then SheetExist = True: Exit Function
Next
ERRORHANDLER:
SheetExist = False
End Function
- Schließe den VBA-Editor und kehre zu Excel zurück.
- Gib in die Zelle F3 den Namen eines Arbeitsblattes (z.B. "B" oder "C") ein. Das entsprechende Arbeitsblatt wird automatisch aktiviert.
Häufige Fehler und Lösungen
Alternative Methoden
Eine alternative Methode könnte die Verwendung einer Dropdown-Liste in Zelle F3 sein, um die Eingabemöglichkeiten zu begrenzen. So kannst Du sicherstellen, dass nur gültige Arbeitsblattnamen eingegeben werden.
- Wähle die Zelle F3 aus.
- Gehe zu "Daten" > "Datenüberprüfung".
- Wähle "Liste" und gib die verfügbaren Arbeitsblattnamen ein (z.B. "B,C").
- Nun kannst Du aus der Dropdown-Liste wählen, was die Wahrscheinlichkeit von Fehlern verringert.
Praktische Beispiele
Wenn Du beispielsweise den Namen eines Arbeitsblattes hast, das "Daten" heißt, und Du diesen Namen in der Zelle F3 eingibst, wird das Arbeitsblatt "Daten" aktiviert, sobald Du die Eingabetaste drückst. Dies ist besonders nützlich, wenn Du häufig zwischen verschiedenen Arbeitsblättern wechseln musst.
Tipps für Profis
- Nutze die
Option Explicit-Anweisung am Anfang Deines Codes, um sicherzustellen, dass alle Variablen deklariert sind. Dies hilft, Fehler zu vermeiden.
- Wenn Du die Funktionalität erweitern möchtest, kannst Du weitere Bedingungen einfügen, die auf andere Zellen oder Bereiche reagieren.
FAQ: Häufige Fragen
1. Kann ich auch Arbeitsblätter mit Leerzeichen im Namen verwenden?
Ja, aber Du musst sicherstellen, dass Du den Arbeitsblattnamen genau so eingibst, wie er im Excel-Dokument angezeigt wird.
2. Was passiert, wenn der eingegebene Name kein gültiger Arbeitsblattname ist?
Die Funktion SheetExist gibt False zurück, und das Arbeitsblatt wird nicht aktiviert. Du kannst dies mit einer Fehlermeldung im Code verbessern, wenn Du möchtest.
3. Ist dieser Code in allen Excel-Versionen verfügbar?
Ja, der Code funktioniert in den meisten Versionen von Excel, die VBA unterstützen, einschließlich Excel 2010 und neuer.