Benennen Sie Blatt in Excel VBA um

Das Umbenennen eines Excel-Arbeitsblatts ist so einfach wie das Umbenennen einer Datei. Dies kann durch Doppelklicken auf einen beliebigen Arbeitsblattnamen oder durch Auswahl von Umbenennen in der rechten Menüliste erfolgen. Was aber, wenn wir ein Excel-Arbeitsblatt mit Hilfe eines VBA-Makros umbenennen wollen? Mit Hilfe von VBA Macro können wir ein oder mehrere Excel-Arbeitsblätter in einer einzigen Aufnahme umbenennen. Wir können sogar den Namen eines Arbeitsblatts korrigieren, um zu verhindern, dass sich jemand ändert. Hier sehen wir mehrere Möglichkeiten, ein Arbeitsblatt umzubenennen.

Wie Blatt in Excel mit VBA umbenennen?

Unten finden Sie verschiedene Beispiele zum Umbenennen von Arbeitsblättern in Excel mit VBA-Code.

Sie können diese Excel-Vorlage für VBA-Umbenennungsblätter hier herunterladen - Excel-Vorlage für VBA-Umbenennungsblätter

VBA Rename Sheet - Beispiel # 1

Obwohl es sehr einfach ist, ein Excel-Arbeitsblatt mit Hilfe von VBA umzubenennen. Es gibt auch viele Möglichkeiten, dies zu tun. In diesem Fall ist der Name unseres Arbeitsblatts standardmäßig auf "Sheet1" festgelegt (siehe Abbildung unten), das wir umbenennen werden.

Schritt 1: Für dieses Beispiel benötigen wir ein Modul, in dem wir die Codierung durchführen. Gehen Sie zum Menü Einfügen und wählen Sie Modul wie unten gezeigt.

Schritt 2: Schreiben Sie nun im neu geöffneten Modul die Unterkategorie in den Namen von VBA Rename Sheet oder in einen anderen Namen.

Code:

 Sub VBA_RenameSheet () End Sub

Schritt 3: Definieren Sie nun eine Variable in einem beliebigen Namen und weisen Sie sie den unten gezeigten Arbeitsblatt-Datentypen zu. Hier haben wir es als " Sheet " bezeichnet.

Code:

 Sub VBA_RenameSheet () Dim Sheet As Worksheet End Sub

Schritt 4: Wählen Sie mit Hilfe des Befehls Set die Option Sheet variable aus (siehe unten).

Code:

 Sub VBA_RenameSheet () Dim Sheet As Worksheet Set Sheet = End Sub

Schritt 5: Wählen Sie mit Hilfe des Arbeitsblatt- Befehls das Arbeitsblatt aus, das Sie umbenennen möchten .

Code:

 Sub VBA_RenameSheet () Dim Sheet As Worksheet Set Sheet = Arbeitsblätter ("Sheet1") End Sub

Schritt 6: Verwenden Sie nun die Blattfunktion zusammen mit dem Namen und weisen Sie den Namen zu, den Sie umbenennen möchten. Hier wählen wir " Umbenanntes Blatt ".

Code:

 Sub VBA_RenameSheet () Dim Sheet As Worksheet Set Sheet = Arbeitsblätter ("Sheet1") Sheet.Name = "Renamed Sheet" End Sub

Schritt 7: Kompilieren Sie nun den Code und führen Sie ihn aus, wenn ein Fehler gefunden wird. Klicken Sie zum Ausführen des Codes auf die Schaltfläche Wiedergabe unterhalb der Menüleiste (siehe Abbildung unten). Wir werden sehen, dass unser Blatt wie unten gezeigt von Sheet1 in Renamed Sheet umbenannt wird.

VBA Rename Sheet - Beispiel # 2

In diesem Beispiel sehen wir einen viel einfacheren Weg, ein Arbeitsblatt mit Hilfe eines VBA-Makros umzubenennen. Dafür bräuchten wir noch ein neues Modul.

Schritt 1: Öffnen Sie ein Modul und schreiben Sie die Unterkategorie von VBA-Umbenennung wie unten gezeigt.

Code:

 Sub VBA_RenameSheet1 () End Sub

Schritt 2: Wählen Sie mit der Funktion Auswählen das Blatt aus, das Sie umbenennen möchten. Hier ist unser Blatt Sheet1 .

Code:

 Sub VBA_RenameSheet1 () Sheets ("Sheet1"). Wählen Sie End Sub

Schritt 3: Betrachten Sie in der nächsten Zeile die Namensfunktion für das ausgewählte Blatt, wie unten gezeigt.

Code:

 Sub VBA_RenameSheet1 () Sheets ("Sheet1"). Wählen Sie Sheets ("Sheet1"). Name = End Sub

Schritt 4: Wählen Sie den Namen, den wir nach dem Umbenennen des Arbeitsblatts vergeben möchten. Wir wählen den gleichen Namen wie in Beispiel 1 als " Umbenanntes Blatt "

 Sub VBA_RenameSheet1 () Sheets ("Sheet1"). Select Sheets ("Sheet1"). Name = "Renamed Sheet" End Sub

Schritt 5: Kompilieren Sie den Code erneut und führen Sie ihn aus. Wir werden sehen, dass Sheet1 mit einem neuen Namen als " Renamed Sheet " umbenannt wird .

VBA Rename Sheet - Beispiel # 3

Es gibt wieder eine ähnliche Möglichkeit, ein Excel-Arbeitsblatt mit Hilfe von VBA umzubenennen. Dies würde dem in Beispiel 2 gezeigten Prozess ein wenig ähneln, ist jedoch viel einfacher zu merken und zu verarbeiten.

Schritt 1: Öffnen Sie ein Modul und schreiben Sie die neue Unterkategorie von VBA Rename Sheet (siehe unten).

Code:

 Sub VBA_RenameSheet2 () End Sub

Schritt 2: Wählen Sie das Blatt aus, das Sie umbenennen möchten. Hier können wir das Blatt auswählen, indem wir die Reihenfolge der Blätter wie unten gezeigt in Klammern setzen. Wir müssen also nicht den Namen von Sheet schreiben, um ihn umzubenennen. Nur die Sequenz dieses Blattes würde funktionieren.

Code:

 Sub VBA_RenameSheet2 () Sheets (1) .Wählen Sie End Sub

Schritt 3: Betrachten Sie in der nächsten Zeile die Namensfunktion mit der ausgewählten Blattfolge, wie unten gezeigt.

Code:

 Sub VBA_RenameSheet2 () Sheets (1) .Select Sheets (1) .Name = End Sub

Schritt 4: Geben Sie nun den Namen ein, den wir dem ausgewählten Sheet1 geben möchten. Betrachten wir den Namen, den wir in den obigen Beispielen als " umbenanntes Blatt " gesehen haben.

Code:

 Sub VBA_RenameSheet2 () Sheets (1) .Select Sheets (1) .Name = "umbenanntes Blatt" End Sub

Schritt 5: Kompilieren Sie nun den Code erneut und führen Sie ihn aus. Wir werden feststellen, dass Sheet1 jetzt wieder in "r enamed Sheet " umbenannt wird, wie unten gezeigt.

VBA Rename Sheet - Beispiel 4

In diesem Beispiel wird gezeigt, wie ein Arbeitsblatt mit nur einer Codezeile umbenannt wird.

Schritt 1: Öffnen Sie ein Modul und schreiben Sie die Unterkategorie von VBA Rename Sheet wie unten gezeigt.

Code:

 Sub VBA_RenameSheet3 () End Sub

Schritt 2: Wählen Sie die Blattfolge, die Sie umbenennen möchten, zusammen mit der Funktion Name, und geben Sie einen Namen ein, mit dem Sie das Blatt wie unten gezeigt umbenennen möchten.

Code:

 Sub VBA_RenameSheet3 () Sheets (1) .Name = "Blatt umbenennen" End Sub

Schritt 3: Führen Sie jetzt einfach den Code aus, um ihn zu implementieren. Wir werden wieder feststellen, dass Sheet1 jetzt in "Rename Sheet " umbenannt wird.

Vorteile von Excel VBA Rename Sheet

  • Wenn mehrere Blätter umbenannt werden müssen, ist die Verwendung von VBA-Code viel besser als der manuelle Vorgang.
  • Wir können den Namen jedes Excel-Arbeitsblatts durch einen einzeiligen VBA-Code ändern, den wir in Beispiel 4 gesehen haben.
  • Obwohl das manuelle Ändern des Namens eines Blatts auch eine einfache Möglichkeit ist, dies zu tun. Aber VBA Rename Sheet ist sehr hilfreich, wenn wir ein neues Blatt erstellen und dieses mit anderen Blättern trennen möchten, nur um es zu kategorisieren.

Dinge, an die man sich erinnern sollte

  • Um einen besseren Überblick über die Änderungen zu erhalten, lassen Sie das VBA-Fenster parallel zum Excel-Arbeitsblatt, damit die Änderung des Arbeitsblattnamens deutlich sichtbar wird.
  • Durch das Speichern der Datei nach Abschluss der Arbeit im Makroaktivierungsformat können wir den Code auch für zukünftige Arbeiten beibehalten.
  • Durch die Automatisierung der Änderung des Blattnamens können wir die Zeit für die Kategorisierung der Blätter und Daten verkürzen.

Empfohlene Artikel

Dies ist eine Anleitung zum VBA-Umbenennungsblatt. In diesem Abschnitt wird das Umbenennen von Arbeitsblättern in Excel mithilfe von VBA-Code zusammen mit einigen praktischen Beispielen und einer herunterladbaren Excel-Vorlage erläutert. Sie können auch unsere anderen Artikelvorschläge durchgehen -

  1. Vollständiger Leitfaden zur VBA-Arbeitsmappe
  2. INDIREKTE Funktion in Excel
  3. Tutorials zur VBA-Zählfunktion
  4. Wie benutze ich die Excel XOR-Funktion?

Kategorie:

VBA