Wie macht man den Namen des Blatttabs gleich dem Zellenwert in Excel?

Manchmal müssen Sie ein Arbeitsblatt umbenennen, um einem bestimmten Zellenwert zu entsprechen. In diesem Artikel zeigen wir Ihnen Methoden, wie Sie den Namen des Blatttabs auf den Wert einer Zelle in Excel setzen können.

Blattname mit VBA-Code gleich Zellenwert machen
Blattname mit Kutools für Excel gleich Zellenwert machen

Blattname mit VBA-Code gleich Zellenwert machen

Mit dem folgenden VBA-Code können Sie den Namen des Blatttabs automatisch auf den Zellenwert setzen.

1. Klicken Sie mit der rechten Maustaste auf den Blatttab, den Sie entsprechend dem Zellenwert umbenennen möchten, und klicken Sie dann im Kontextmenü auf "Code anzeigen". Siehe Screenshot:

2. Kopieren Sie den folgenden Code und fügen Sie ihn in das Codefenster ein, und drücken Sie dann gleichzeitig die Tasten "Alt" + "Q", um das Microsoft Visual Basic for Applications-Fenster zu schließen.

VBA-Code: Blatttab gleich Zellenwert machen

Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20230130
    On Error Resume Next
    If Not Intersect(Target, Range("A1")) Is Nothing Then
        ActiveSheet.Name = ActiveSheet.Range("A1")
    ElseIf Not Intersect(Target.Dependents, Range("A1")) Then
        ActiveSheet.Name = ActiveSheet.Range("A1")
    End If
End Sub

Hinweis: Im Code ist A1 die Zelle, die den Wert enthält, den Sie als Blattname verwenden möchten. Sie können dies nach Bedarf ändern.

Ab jetzt wird sich der Name des Blatttabs automatisch aktualisieren, wenn sich der Wert in Zelle A1 ändert.

Blattname mit Kutools für Excel gleich Zellenwert machen

In diesem Abschnitt stellen wir Ihnen das Hilfsprogramm „Arbeitsblätter massenhaft umbenennen“ von „Kutools für Excel“ vor. Mit diesem Hilfsprogramm können Sie Arbeitsblätter ganz einfach basierend auf dem Wert bestimmter Zellen in Excel umbenennen.

1. Klicken Sie auf „Kutools Plus“ > „Arbeitsblatt“ > „Arbeitsblätter massenhaft umbenennen“. Siehe Screenshot:

2. Im Dialogfeld „Arbeitsblätter massenhaft umbenennen“ müssen Sie folgendes tun.

Sie sehen, dass die ausgewählten Arbeitsblätter sofort entsprechend dem angegebenen Bereichswert umbenannt werden, wie im folgenden Screenshot gezeigt.

Hinweise:

Blattname mit Kutools für Excel gleich Zellenwert machen