Renommer les feuilles dans Excel se fait à partir de la barre des tâches sous les feuilles de calcul sont présentes en double-cliquant dessus, mais dans VBA, nous utilisons la méthode de propriété Sheets ou Worksheet pour renommer la feuille, la syntaxe pour renommer une feuille dans VBA est la suivante Sheets (" Nom de l'ancienne feuille »). Name =« Nom de la nouvelle feuille ».
Renommer la feuille dans Excel VBA
Nous avons tous fait cette tâche de renommer la feuille de calcul selon notre identité ou selon notre convenance, n'est-ce pas? Renommer n'est pas sorcier à maîtriser, mais si vous êtes le codeur VBA, vous devez connaître cette tâche de renommer la feuille de calcul. Puisque nous travaillons avec des feuilles de calcul en utilisant leurs noms, il est important de connaître l'importance des noms de feuille de calcul dans le codage VBA. Dans cet article, nous allons vous montrer comment renommer la feuille à l'aide du codage Excel VBA.
Comment renommer la feuille dans VBA?
Changer le nom de la feuille de calcul ne nécessite aucune compétence particulière. Nous avons juste besoin de référencer le nom de feuille que nous modifions en entrant le nom de feuille existant.
Par exemple, si nous voulons renommer la feuille nommée «Feuille 1», nous devons appeler la feuille par son nom en utilisant l'objet Worksheet.
Feuilles de travail («Sheet1»)
Après avoir mentionné le nom de la feuille, nous devons sélectionner la propriété «Nom» pour renommer le nom de la feuille de calcul.
Feuilles de travail («Sheet1»). Nom
Nous devons maintenant définir la propriété Name sur le nom selon notre souhait.
Feuilles de calcul («Sheet1»). Name = «New Name»
Comme ça, nous pouvons renommer le nom de la feuille de calcul dans VBA en utilisant la propriété Name.
Dans les sections suivantes de l'article, nous vous montrerons de plus en plus d'exemples de modification ou de changement de nom de la feuille de calcul.
Exemples de feuilles de calcul Renommer dans Excel VBA
Voici les exemples de la feuille de changement de nom VBA.
Exemple # 1 - Changer ou renommer la feuille à l'aide de variables VBA.
Par exemple, regardez l'exemple de code ci-dessous.
Code:
Sub Rename_Example1 () Dim Ws As Worksheet Set Ws = Worksheets ("Sheet1") Ws.Name = "New Sheet" End Sub
Dans le code ci-dessus, j'ai d'abord déclaré la variable comme feuille de travail.
Dim Ws As Feuille de calcul
Ensuite, j'ai défini la référence à la variable comme «Sheet1» à l'aide de l'objet worksheets.
Set Ws = Worksheets ("Sheet1")
Désormais, la variable «Ws» contient la référence de la feuille de calcul «Sheet1».
À l'aide de la variable «Ws», j'ai renommé la feuille de calcul en «Nouvelle feuille».
Ce code changera le nom de «Sheet1» en «New Sheet».
Si j'exécute le code manuellement ou via la touche de raccourci F5, nous obtiendrons encore une fois une erreur Indice hors plage.
La raison pour laquelle nous obtenons cette erreur est que, à l'étape précédente elle-même, nous avons déjà changé la feuille de calcul nommée "Sheet1" en "New Sheet" Puisqu'il n'y a plus de nom de feuille de calcul, «Sheet1» n'est pas disponible, VBA renvoie cette erreur.
Exemple # 2 - Obtenez tous les noms de feuille de calcul dans une seule feuille.
Nous pouvons obtenir tous les noms de feuille de calcul du classeur dans une seule feuille. Le code ci-dessous extraira tous les noms de feuille de calcul.
Code:
Sub Renmae_Example2 () Dim Ws As Worksheet Dim LR As Long For Each Ws In ActiveWorkbook.Worksheets LR = Worksheets ("Main Sheet"). Cells (Rows.Count, 1) .End (xlUp) .Row + 1 Cells (LR, 1) .Sélectionnez ActiveCell.Value = Ws.Name Next Ws End Sub
Ce code extraira tous les noms de feuille de calcul disponibles dans la feuille nommée «Feuille principale».
Exemple # 3 - Définir un nom permanent sur la feuille de calcul Excel à l'aide de VBA
Puisque nous travaillons avec des noms de feuille dans le codage, il est important de leur attribuer des noms permanents. Comment leur attribuer des noms permanents?
Par exemple, regardez le code ci-dessous.
Code:
Sub Rename_Example3 () Worksheets ("Sheet1"). Sélectionnez End Sub
Le code ci-dessus sélectionnera la feuille Sheet1.
Si votre classeur est utilisé par de nombreuses personnes, si quelqu'un a changé le nom de la feuille de calcul, nous obtiendrons l'erreur Indice hors plage.
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.”
Si j'exécute le code en utilisant la touche F5 ou manuellement, il sélectionnera toujours la feuille nommée «Ventes» uniquement. Puisque nous lui avons donné un nom permanent, il ne sélectionnera toujours que la même feuille.
