Das Umbenennen von Arbeitsblättern in Excel erfolgt über die Taskleiste unten. Die Arbeitsblätter werden durch Doppelklicken angezeigt. In VBA verwenden wir jedoch die Eigenschaftsmethode "Blätter" oder "Arbeitsblatt", um das Blatt umzubenennen. Die Syntax zum Umbenennen eines Blattes in VBA lautet wie folgt: " Alter Blattname ”). Name =“ Neuer Blattname ”.
Benennen Sie das Blatt in Excel VBA um
Wir alle haben diese Aufgabe erledigt, das Arbeitsblatt gemäß unserer Identität oder gemäß unserer Bequemlichkeit umzubenennen, nicht wahr? Das Umbenennen ist kein Hexenwerk, aber wenn Sie der VBA-Codierer sind, müssen Sie diese Aufgabe des Umbenennens des Arbeitsblatts kennen. Da wir mit Arbeitsblättern unter Verwendung ihrer Namen arbeiten, ist es wichtig, die Bedeutung der Arbeitsblattnamen bei der VBA-Codierung zu kennen. In diesem Artikel zeigen wir Ihnen, wie Sie das Blatt mithilfe der Excel VBA-Codierung umbenennen.
Wie benenne ich Sheet in VBA um?
Das Ändern des Namens des Arbeitsblatts erfordert keine besonderen Fähigkeiten. Wir müssen nur angeben, welchen Blattnamen wir ändern, indem wir den vorhandenen Blattnamen eingeben.
Wenn wir beispielsweise das Blatt mit dem Namen "Blatt 1" umbenennen möchten, müssen wir das Blatt mithilfe des Arbeitsblattobjekts beim Namen nennen.
Arbeitsblätter ("Sheet1")
Nachdem wir den Blattnamen erwähnt haben, müssen wir die Eigenschaft "Name" auswählen, um den Arbeitsblattnamen umzubenennen.
Arbeitsblätter ("Sheet1"). Name
Jetzt müssen wir die Name-Eigenschaft gemäß unserem Wunsch auf den Namen setzen.
Arbeitsblätter ("Sheet1"). Name = "Neuer Name"
Auf diese Weise können wir den Arbeitsblattnamen in VBA mithilfe der Name-Eigenschaft umbenennen.
In den folgenden Abschnitten des Artikels zeigen wir Ihnen immer mehr Beispiele für das Ändern oder Umbenennen des Arbeitsblatts.
Beispiele für das Umbenennen von Arbeitsblättern in Excel VBA
Nachfolgend finden Sie Beispiele für das VBA-Umbenennungsblatt.
Beispiel 1 - Blatt mit VBA-Variablen ändern oder umbenennen.
Schauen Sie sich zum Beispiel den folgenden Beispielcode an.
Code:
Sub Rename_Example1 () Dim Ws As Worksheet Set Ws = Arbeitsblätter ("Sheet1") Ws.Name = "New Sheet" End Sub
Im obigen Code habe ich zuerst die Variable als Arbeitsblatt deklariert.
Dim Ws als Arbeitsblatt
Als nächstes habe ich den Verweis auf die Variable unter Verwendung eines Arbeitsblattobjekts als "Sheet1" festgelegt.
Setze Ws = Arbeitsblätter ("Sheet1")
Jetzt enthält die Variable "Ws" die Referenz des Arbeitsblatts "Sheet1".
Mit der Variablen "Ws" habe ich das Arbeitsblatt in "Neues Blatt" umbenannt.
Dieser Code ändert den Namen "Sheet1" in "New Sheet".
Wenn ich den Code manuell oder über die Tastenkombination F5 ausführe, wird erneut der Fehler "Index außerhalb des Bereichs" angezeigt.
Der Grund, warum wir diesen Fehler erhalten, weil wir im vorherigen Schritt das Arbeitsblatt mit dem Namen "Sheet1" bereits in "New Sheet" geändert haben. Da kein Arbeitsblattname mehr vorhanden ist und "Sheet1" nicht verfügbar ist, gibt VBA diesen Fehler aus.
Beispiel 2 - Holen Sie sich alle Arbeitsblattnamen in einem einzigen Blatt.
Wir können alle Arbeitsblattnamen der Arbeitsmappe in einem einzigen Blatt abrufen. Der folgende Code extrahiert alle Arbeitsblattnamen.
Code:
Sub Renmae_Example2 () Dim Ws als Arbeitsblatt Dim LR so lange für jedes Ws in ActiveWorkbook.Worksheets LR = Arbeitsblätter ("Hauptblatt"). Cells (Rows.Count, 1) .End (xlUp) .Row + 1 Cells (LR, 1) .Wählen Sie ActiveCell.Value = Ws.Name Next Ws End Sub
Dieser Code extrahiert alle verfügbaren Arbeitsblattnamen in das Blatt mit dem Namen "Hauptblatt".
Beispiel 3 - Festlegen eines dauerhaften Namens für das Excel-Arbeitsblatt mithilfe von VBA
Da wir bei der Codierung mit Blattnamen arbeiten, ist es wichtig, ihnen permanente Namen zu geben. Wie setzen wir ihnen dauerhafte Namen?
Schauen Sie sich zum Beispiel den folgenden Code an.
Code:
Sub Rename_Example3 () Arbeitsblätter ("Sheet1"). Wählen Sie End Sub
Der obige Code wählt das Blatt1 aus.
Wenn Ihre Arbeitsmappe von vielen Personen verwendet wird und jemand den Namen des Arbeitsblatts geändert hat, wird der Fehler "Index außerhalb des Bereichs" angezeigt.
To avoid this, we can set the permanent name to it. To set the permanent name to follow the below steps.
Step 1: Select the sheet we need to set the permanent name to in Visual Basic Editor.
Step 2: Press the F4 key to see the Properties window.
Step 3: Under Name, Property Change the name to “New Name.”
As you can see, one name is showing as “Sheet1” and in a bracket, we can see the new name as “New Sheet.”
Now in coding, we will use the new name instead of an actual visible name.
Code:
Sub Rename_Example3() NewSheet.Select End Sub
Now come back to the worksheet window. We can still see the sheet name as “Sheet1” only.
Now I will change the sheet name to “Sales.”
Wenn ich den Code mit der Taste F5 oder manuell ausführe, wird weiterhin nur das Blatt mit dem Namen "Vertrieb" ausgewählt. Da wir ihm einen dauerhaften Namen gegeben haben, wird immer nur dasselbe Blatt ausgewählt.
