VBA Blatt umbenennen

Blatt in Excel VBA umbenennen

Ein beliebiges Excel-Arbeitsblatt umzubenennen ist so einfach wie das Umbenennen einer Datei. Dies kann durch einen Doppelklick auf den Namen eines Arbeitsblatts oder durch die Auswahl von Umbenennen in der rechten Menüliste geschehen. Aber was ist, wenn wir ein Excel-Arbeitsblatt mit Hilfe eines VBA-Makros umbenennen wollen? Mit Hilfe von VBA-Makros können wir ein oder mehrere Excel-Arbeitsblätter in einem einzigen Schritt umbenennen. Wir können sogar den Namen eines Arbeitsblatts fixieren, um zu verhindern, dass er von jemandem geändert wird. Hier sehen wir mehrere Möglichkeiten, ein Arbeitsblatt umzubenennen.

Wie kann man ein Blatt in Excel mit VBA umbenennen?

Nachfolgend finden Sie verschiedene Beispiele, wie man ein Blatt in Excel mit VBA-Code umbenennen kann.

VBA Rename Sheet – Example #1

Obwohl es sehr einfach ist, jedes Excel-Arbeitsblatt mit Hilfe von VBA umzubenennen. Es gibt auch viele Möglichkeiten, dies zu tun. Hier ist der Name unseres Arbeitsblatts standardmäßig auf „Sheet1“ eingestellt, wie unten gezeigt, das wir umbenennen werden.

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

Schritt 2: Schreiben Sie nun in das neu geöffnete Modul die Unterkategorie mit dem Namen „VBA Blatt umbenennen“ oder mit einem beliebigen anderen Namen.

Code:

Sub VBA_RenameSheet()End Sub

Schritt 3: Definieren Sie nun eine Variable mit einem beliebigen Namen und weisen Sie sie den Datentypen des Arbeitsblatts zu, wie unten gezeigt. Hier haben wir sie „Sheet“ genannt.

Code:

Sub VBA_RenameSheet()Dim Sheet As WorksheetEnd Sub

Schritt 4: Wählen Sie mit Hilfe des Befehls Set die Blattvariable wie unten gezeigt aus.

Code:

Sub VBA_RenameSheet()Dim Sheet As WorksheetSet Sheet =End Sub

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

Code:

Sub VBA_RenameSheet()Dim Sheet As WorksheetSet Sheet = Worksheets("Sheet1")End Sub

Schritt 6: Verwenden Sie nun die Funktion „Blatt“ zusammen mit „Name“ und geben Sie den Namen ein, den Sie umbenennen möchten. Hier wählen wir „Umbenanntes Blatt“.

Code:

Sub VBA_RenameSheet()Dim Sheet As WorksheetSet Sheet = Worksheets("Sheet1")Sheet.Name = "Renamed Sheet"End Sub

Schritt 7: Kompilieren Sie nun endlich den Code und führen Sie ihn aus, wenn ein Fehler gefunden wird. Um den Code auszuführen, klicken Sie auf die Schaltfläche Abspielen, die sich unter der Menüleiste befindet (siehe unten). Wir werden sehen, dass unser Blatt von Blatt1 in Umbenanntes Blatt umbenannt wird, wie unten gezeigt.

VBA Blatt umbenennen – Beispiel Nr. 2

In diesem Beispiel werden wir einen viel einfacheren Weg sehen, ein beliebiges Arbeitsblatt mit Hilfe eines VBA-Makros umzubenennen. Dazu benötigen wir ein neues Modul.

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

Code:

Sub VBA_RenameSheet1()End Sub

Schritt 2: Wählen Sie das Blatt aus, das wir mit der Funktion Select umbenennen wollen. Hier ist unser Blatt Blatt1.

Code:

Sub VBA_RenameSheet1()Sheets("Sheet1").SelectEnd Sub

Schritt 3: In der nächsten Zeile betrachten Sie die Funktion Name mit dem ausgewählten Blatt, wie unten gezeigt.

Code:

Sub VBA_RenameSheet1()Sheets("Sheet1").SelectSheets("Sheet1").Name =End Sub

Schritt 4: Wählen Sie den Namen, den wir nach der Umbenennung des Blattes geben wollen. Wir wählen denselben Namen wie in Beispiel 1 als „Umbenanntes Blatt“

Sub VBA_RenameSheet1()Sheets("Sheet1").SelectSheets("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 – Example #3

Es gibt noch eine weitere ähnliche Möglichkeit, ein Excel-Arbeitsblatt mit Hilfe von VBA umzubenennen. Dies würde ein wenig ähnlich dem Prozess, den wir in Beispiel-2 gesehen haben, aber viel einfacher zu merken und zu verarbeiten.

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

Code:

Sub VBA_RenameSheet2()End Sub

Schritt 2: Wählen Sie das Blatt, das wir umbenennen wollen. Hier können wir das Blatt auswählen, indem wir die Reihenfolge der Blätter in Klammern setzen, wie unten gezeigt. Wir brauchen also nicht den Namen des umzubenennenden Blattes zu schreiben. Nur die Sequenz dieses Blattes würde funktionieren.

Code:

Sub VBA_RenameSheet2()Sheets(1).SelectEnd Sub

Schritt 3: In der nächsten Zeile betrachten Sie die Funktion Name mit der ausgewählten Blatt-Sequenz wie unten gezeigt.

Code:

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

Schritt 4: Geben Sie nun den Namen ein, den wir dem ausgewählten Blatt1 geben wollen. Betrachten wir den Namen, den wir in den obigen Beispielen gesehen haben, als „umbenanntes Blatt“.

Code:

Sub VBA_RenameSheet2()Sheets(1).SelectSheets(1).Name = "renamed Sheet"End Sub

Schritt 5: Nun kompilieren Sie den Code erneut und führen ihn aus. Wir werden feststellen, dass Sheet1 jetzt wieder in „umbenanntes Sheet“ umbenannt wird, wie unten gezeigt.

VBA Rename Sheet – Example #4

In diesem Beispiel werden wir sehen, wie man ein beliebiges Arbeitsblatt mit nur einer Zeile Code umbenennen kann.

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 aus, die wir zusammen mit der Funktion Name umbenennen möchten, und geben Sie einen Namen ein, mit dem wir das Blatt wie unten gezeigt umbenennen möchten.

Code:

Sub VBA_RenameSheet3()Sheets(1).Name = "rename Sheet"End Sub

Schritt 3: Führen Sie nun einfach den Code aus, um ihn zu implementieren. Wir werden wieder feststellen, dass Blatt1 jetzt als „Blatt umbenennen“

Vorteile von Excel VBA Blatt umbenennen

• Wenn wir mehrere Blätter umzubenennen haben, ist die Verwendung von VBA-Code viel besser als der manuelle Prozess.
• Wir können den Namen eines beliebigen Excel-Arbeitsblatts mit Hilfe eines einzeiligen VBA-Codes ändern, den wir in Beispiel 4 gesehen haben.
• Obwohl das manuelle Ändern des Namens eines beliebigen Blatts auch eine einfache Möglichkeit ist. Aber VBA Rename Sheet ist sehr hilfreich, wenn wir ein neues Blatt erstellen und wir wollen, dass mit anderen Blättern zu trennen, nur um es zu kategorisieren.

Things to Remember

• Um einen besseren Überblick über die Änderungen passieren, halten VBA-Fenster parallel zu Excel-Blatt, so dass die Änderung der Blattname wird deutlich sichtbar sein.
• Speichern Sie die Datei nach der Arbeit im Makro-Format ermöglicht es uns, den Code für die künftige Arbeit als gut zu bewahren.
• Automatisierung der Prozess der Änderung der Blattname wird uns helfen, in der Verringerung der Zeit Kategorisierung der Blätter und Daten.

Empfohlene Artikel

Dies ist ein Leitfaden für VBA Rename Sheet. Hier diskutieren wir, wie man Blatt in Excel mit VBA-Code umbenennen zusammen mit einigen praktischen Beispielen und herunterladbare Excel-Vorlage. Sie können auch unsere anderen empfohlenen Artikel durchgehen –

1. VBA Workbook
2. VBA Name Worksheet
3. VBA Unprotect Sheet
4. VBA Protect Sheet