Wie kann man in Excel Blätter basierend auf Zellwerten (aus einer Liste) umbenennen?

Schritt 1: Klicken Sie mit der rechten Maustaste auf den Namen des Arbeitsblatts, das Sie dynamisch anhand eines Zellenwerts benennen möchten, und wählen Sie Code anzeigen aus dem Rechtsklick-Menü.

Schritt 2: Fügen Sie im sich öffnenden Microsoft Visual Basic for Applications-Fenster den folgenden VBA-Code in das Modulfenster ein.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set Target = Range("A1")
If Target = "" Then Exit Sub
Application.ActiveSheet.Name = VBA.Left(Target, 31)
Exit Sub
End Sub

Tipp: Dieses VBA benennt das Arbeitsblatt dynamisch basierend auf dem Wert in Zelle A1 um. Sie können "A1" je nach Bedarf in andere Zellen ändern.

Schritt 3: Speichern Sie den VBA-Code und schließen Sie das Microsoft Visual Basic for Applications-Fenster.

Anschließend sehen Sie, dass der Blattname basierend auf dem angegebenen Zellenwert dynamisch geändert wird.

1. Klicken Sie auf Kutools Plus > Arbeitsblatt > Arbeitsblätter umbenennen. Siehe Screenshot:
   
2. Im sich öffnenden Arbeitsblätter massenhaft umbenennen Dialogfeld gehen Sie wie folgt vor:
   1. In der Arbeitsblätter liste markieren Sie die Arbeitsblätter, die Sie umbenennen möchten.
   2. Im Abschnitt Umbenennungsstil aktivieren Sie die Option Ursprünglichen Namen ersetzen.
   3. Im Abschnitt Dateinamequelle aktivieren Sie die Option Aus entsprechender Arbeitsblattzelle umbenennen und geben die Zelle an, deren Inhalt Sie zum Umbenennen des entsprechenden Blatts verwenden möchten.
   4. Klicken Sie auf die Schaltfläche OK.

Und jetzt werden alle markierten Blätter basierend auf der angegebenen Zelle jedes Blatts umbenannt. Siehe Screenshot:

1. Klicken Sie auf Kutools Plus > Arbeitsblatt > Arbeitsblätter umbenennen.
   
2. Im sich öffnenden Arbeitsblätter massenhaft umbenennen Dialogfeld konfigurieren Sie wie folgt:
   1. In der Arbeitsblätterliste wählen Sie die Arbeitsblätter aus, die Sie umbenennen möchten.
   2. Im Abschnitt Umbenennungsstil aktivieren Sie die Option Ursprünglichen Namen ersetzen.
   3. Im Dateinamequelle Abschnitt aktivieren Sie die Aus Auswahl Option und klicken Sie auf die  Schaltfläche, um das zweite Arbeitsblätter massenhaft umbenennen Dialogfeld zu öffnen (siehe rechtes Screenshot). Wählen Sie dann die Liste der Zellen aus, die Sie anhand ihrer Werte umbenennen möchten, und klicken Sie auf die OK Schaltfläche.
   4. Klicken Sie auf die Schaltfläche OK, um die Umbenennung anzuwenden.

Dann sehen Sie, dass die Namen aller markierten Arbeitsblätter durch die Zellwerte in der angegebenen Liste ersetzt wurden. Siehe unten stehenden Screenshot:

Demo: Blätter basierend auf Zellwerten (aus einer Liste) in Excel benennen

Verwandte Artikel: