Direkt zum Inhalt

Wie benenne ich Tabellen basierend auf Zellwerten (aus der Liste) in Excel um?

Das Umbenennen eines einzelnen Arbeitsblatts in Excel erfolgt normalerweise, indem Sie mit der rechten Maustaste auf die Registerkarte des Blatts klicken und im Kontextmenü „Umbenennen“ auswählen. Wenn Sie jedoch mehrere Arbeitsblätter mit Werten aus bestimmten Zellen umbenennen müssen oder ein Arbeitsblatt dynamisch basierend auf dem Wert einer bestimmten Zelle benennen möchten, stehen Ihnen mehrere Methoden zur Verfügung. Dieser Artikel führt Sie durch diese Techniken und macht den Prozess unkompliziert und effizient.

Benennen Sie ein Blatt dynamisch anhand des Zellenwerts mit VBA um

Mit VBA in Excel können wir ein Arbeitsblatt dynamisch aus dem Wert einer bestimmten Zelle umbenennen, und Sie können wie folgt vorgehen:

Schritt 1: Klicken Sie mit der rechten Maustaste auf den Blattnamen des Arbeitsblatts, das Sie dynamisch nach einem Zellenwert benennen möchten, und wählen Sie es aus Code anzeigen aus dem Kontextmenü.

Schritt 2: In der Eröffnung Microsoft Visual Basic für Applikationen Fügen Sie im Modulfenster den folgenden VBA-Code 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 für Anwendung Fenster.

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

Anmerkungen:

  • Wenn die angegebene Zelle leer ist, wird das Arbeitsblatt nicht umbenannt.
  • Das Arbeitsblatt wird jedes Mal umbenannt, wenn Sie den Wert in der angegebenen Zelle ändern.
  • Wenn Sie Sonderzeichen in die angegebene Zelle eingeben, z. B. *, wird eine Fehlermeldung angezeigt.

Benennen Sie mehrere Blätter basierend auf den Zellenwerten in den entsprechenden Blättern um

Mit der oben beschriebenen Methode können Sie jeweils ein Blatt umbenennen. Durch die Verwendung der Benennen Sie mehrere Arbeitsblätter um Merkmal von Kutools for Excelkönnen Sie schnell alle oder mehrere Blätter basierend auf dem Wert einer bestimmten Zelle in jedem entsprechenden Blatt umbenennen. Sie können beispielsweise jedes Blatt so umbenennen, dass es mit dem Wert in Zelle A1 dieses bestimmten Blatts übereinstimmt.

Kutools for Excel - Vollgepackt mit über 300 wichtigen Tools für Excel. Genießen Sie eine 30-tägige KOSTENLOSE Testversion mit vollem Funktionsumfang, ohne dass eine Kreditkarte erforderlich ist! Jetzt herunterladen!

  1. Klicken Sie auf Kostenlos erhalten und dann auf Installieren. Kutoolen Plus > Arbeitsblatt > Arbeitsblätter umbenennen. Siehe Screenshot:
  2. In der Eröffnung Benennen Sie mehrere Arbeitsblätter um Dialogfeld, bitte gehen Sie wie folgt vor:
    1. Im Arbeitsblätter Überprüfen Sie in der Liste die Arbeitsblätter, die Sie umbenennen möchten.
    2. Im Optionen umbenennen Abschnitt, überprüfen Sie die Ersetzen Sie den ursprünglichen Blattnamen .
    3. Im Neuer Arbeitsblattname Abschnitt überprüfen Sie bitte die Benennen Sie Arbeitsblätter mit einer bestimmten Zelle um Option und geben Sie die Zelle an, mit deren Inhalt Sie das entsprechende Blatt umbenennen möchten.
    4. Klicken Sie auf die Ok .

Und jetzt werden alle überprüften Blätter basierend auf der angegebenen Zelle jedes Blattes umbenannt. Siehe Screenshot:

Hinweis: Möchten Sie auf die zugreifen Benennen Sie mehrere Arbeitsblätter um Besonderheit? Herunterladen Kutools for Excel Jetzt! Darüber hinaus verfügt Kutools über eine Vielzahl von über 300 weiteren Funktionen und bietet eine 30-tägige kostenlose Testversion. Warten Sie nicht, probieren Sie es noch heute aus!

Benennen Sie mehrere Blätter aus der angegebenen Liste um

Kutools für Excel Benennen Sie mehrere Arbeitsblätter um Die Funktion unterstützt auch das Umbenennen mehrerer Blätter basierend auf Zellenwerten in einer angegebenen Liste.

Kutools for Excel - Vollgepackt mit über 300 wichtigen Tools für Excel. Genießen Sie eine 30-tägige KOSTENLOSE Testversion mit vollem Funktionsumfang, ohne dass eine Kreditkarte erforderlich ist! Jetzt herunterladen!

  1. Klicken Sie auf Kostenlos erhalten und dann auf Installieren. Kutoolen Plus > Arbeitsblatt > Arbeitsblätter umbenennen.
  2. In der Eröffnung Benennen Sie mehrere Arbeitsblätter um Konfigurieren Sie das Dialogfeld wie folgt:
    1. Im Arbeitsblätter Wählen Sie in der Liste die Arbeitsblätter aus, die Sie umbenennen möchten.
    2. Im Optionen umbenennen Abschnitt, überprüfen Sie die Ersetzen Sie den ursprünglichen Blattnamen .
    3. Im Neuer Arbeitsblattname Abschnitt, überprüfen Sie die Aus dem spezifischen Bereich Option und klicken Sie auf  Taste, um die zweite zu öffnen Benennen Sie mehrere Arbeitsblätter um Dialogfeld (siehe rechter Screenshot). Wählen Sie dann die Liste der Zellen aus, die Sie nach ihren Werten umbenennen möchten, und klicken Sie auf OK .
    4. Klicken Sie auf die Ok Schaltfläche zum Anwenden der Umbenennung.
    5.

Dann werden Sie sehen, dass die Namen aller überprüften Arbeitsblätter durch die Zellenwerte in der angegebenen Liste ersetzt werden. Siehe folgenden Screenshot:

Hinweis: Möchten Sie auf die zugreifen Benennen Sie mehrere Arbeitsblätter um Besonderheit? Herunterladen Kutools for Excel Jetzt! Darüber hinaus verfügt Kutools über eine Vielzahl von über 300 weiteren Funktionen und bietet eine 30-tägige kostenlose Testversion. Warten Sie nicht, probieren Sie es noch heute aus!

Demo: Namensblätter basierend auf Zellenwerten (aus Liste) in Excel


Kutools for Excel: Über 300 praktische Werkzeuge immer zur Hand! Starten Sie noch heute Ihre 30-tägige kostenlose Testversion ohne Funktionseinschränkungen. Jetzt herunterladen!

In Verbindung stehende Artikel:

Beste Office-Produktivitätstools

🤖 Kutools KI-Assistent: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung   |  Code generieren  |  Erstellen Sie benutzerdefinierte Formeln  |  Analysieren Sie Daten und erstellen Sie Diagramme  |  Rufen Sie Kutools-Funktionen auf...
Beliebte Funktionen: Suchen, markieren oder identifizieren Sie Duplikate   |  Leere Zeilen löschen   |  Kombinieren Sie Spalten oder Zellen, ohne Daten zu verlieren   |   Runde ohne Formel ...
Super-Lookup: VLookup mit mehreren Kriterien  |   VLookup mit mehreren Werten  |   VLookup über mehrere Blätter hinweg   |   Unscharfe Suche ....
Erweiterte Dropdown-Liste: Erstellen Sie schnell eine Dropdown-Liste   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl Dropdown-Liste ....
Spaltenmanager: Fügen Sie eine bestimmte Anzahl von Spalten hinzu  |  Spalten verschieben  |  Schalten Sie den Sichtbarkeitsstatus ausgeblendeter Spalten um  |  Vergleichen Sie Bereiche und Spalten ...
Ausgewählte Funktionen: Rasterfokus   |  Designansicht   |   Große Formelleiste   |  Arbeitsmappen- und Blattmanager   |  Ressourcen (Autotext)   |  Datumsauswahl   |  Arbeitsblätter kombinieren   |  Zellen verschlüsseln/entschlüsseln   |  Senden Sie E-Mails nach Liste   |  Superfilter   |   Spezialfilter (Filter fett/kursiv/durchgestrichen...) ...
Top 15 Toolsets:  12 Text Tools (Text hinzufügen, Zeichen entfernen, ...)   |   50+ Chart Typen (Gantt-Diagramm, ...)   |   40+ Praktisch Formeln (Berechnen Sie das Alter basierend auf dem Geburtstag, ...)   |   19 Einfügen Tools (QR-Code einfügen, Bild aus Pfad einfügen, ...)   |   12 Umwandlung (Conversion) Tools (Zahlen zu Wörtern, Currency Conversion, ...)   |   7 Zusammenführen & Teilen Tools (Erweiterte Zeilen kombinieren, Zellen teilen, ...)   |   ... und mehr

Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen.  Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...

Beschreibung

Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
Comments (7)
No ratings yet. Be the first to rate!
Lorenzo
Lorenzo
This comment was minimized by the moderator on the site
Hi there, one question if i want to use the value of 2 cells (A1 & B1) what i have to change?
Reply
0
0
Amanda Lee
Amanda Lee     Lorenzo
This comment was minimized by the moderator on the site
Hi there,

Please try the code below:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim sheetName As String
    
    If Not Intersect(Target, Me.Range("A1:B1")) Is Nothing Then
        sheetName = VBA.Left(Me.Range("A1").Value & Me.Range("B1").Value, 31)
        
        If sheetName <> "" Then
            Application.ActiveSheet.Name = sheetName
        End If
    End If
End Sub

Once you done pasting the code to the View Code window, please select the cell A1 or B1 to make the code run.

Amanda
Reply
Report
0
0
Олег
Олег
This comment was minimized by the moderator on the site
Здравствуйте! Подскажите, пожалуйста, а как в Excel создать левую панель, в которой разместить названия листов? То есть перенести ярлыки листов влево (сейчас то они снизу)
Reply
0
0
Amanda Lee
Amanda Lee     Олег
This comment was minimized by the moderator on the site
Hi there,

Hope this tutorial would help you: https://www.extendoffice.com/documents/excel/3117-excel-worksheet-tabs-in-a-vertical-arrangement-on-left-side.html

Amanda
Reply
Report
0
0
sriggins
sriggins
This comment was minimized by the moderator on the site
I used the dynamic sheet name coding and functionally it works well, but I get the Runtime Error 1004 whenever I click inside a cell. Anyone have any info on how to correct this?


Thanks
Reply
Report
0
0
HHani
HHani
This comment was minimized by the moderator on the site
This is awesome, thank you so much....
Reply
0
0
Mel
Mel
This comment was minimized by the moderator on the site
so I am trying to do this, but nothing is happening - my sheet names aren't changing, everything is the exact same. Do you know what I am doing wrong??
Reply
0
0
There are no comments posted here yet
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations