Cet article fournit les réponses à vos questions sur comment ajouter une feuille avec un nom dans Excel VBA Si vous êtes à la recherche de ce genre d'astuces uniques, vous êtes au bon endroit. Ici, nous allons discuter de ce qui suit. 6 easy & ; proven ways of adding a sheet with a name in Excel (en anglais) VBA .

Télécharger le cahier d'exercices

Vous pouvez télécharger le classeur Excel suivant pour mieux comprendre et vous entraîner.

Code VBA pour ajouter une feuille avec un nom

Nous utiliserons le Objet de la feuille pour ajouter une feuille dans Excel. Les principes fondamentaux VBA Le code pour ajouter une feuille avec le nom ressemble à celui ci-dessous.

Avant : C'est facultatif. Il ajoute une nouvelle feuille avant une feuille spécifique.

Après : C'est également facultatif. Il ajoute une nouvelle feuille après une feuille spécifique.

Compte : Il s'agit également d'un paramètre facultatif qui indique le nombre de feuilles à ajouter.

Type : Il est également facultatif. Il spécifie le type de feuille. Ici, la valeur par défaut est xlWorksheet .

6 façons différentes d'ajouter une feuille avec un nom dans Excel VBA

Dans Excel, nous pouvons ajouter une nouvelle feuille avec la commande add ⊕ juste à côté du nom de la feuille. Avez-vous déjà pensé à automatiser la même tâche dans Excel ? N'y pensez plus car VBA vous couvre.

Ici, nous avons une feuille de calcul nommée Rapport sur les ventes Il contient le Rapport quotidien sur les ventes d'une certaine cafétéria. En colonnes B , C et D il y a des noms de Représentants des ventes , Articles et Quantité respectivement.

Ici, nous allons ajouter d'autres feuilles dans ce classeur avec l'aide de Macro VBA .

Ici, nous avons utilisé Microsoft Excel 365 mais vous pouvez utiliser toute autre version à votre convenance.

1. ajouter une feuille avec un nom dans Excel VBA

Dans notre première méthode, nous ajouterons une feuille portant le nom de la rubrique entrée utilisateur Si vous êtes curieux d'apprendre, suivez ces quelques étapes simples.

📌 Des pas :

• Au tout début, allez dans la section Développeur onglet.
• Deuxièmement, sélectionnez Visual Basic sur le Code groupe.
• Vous pouvez également appuyer sur ALT + F11 pour effectuer la même tâche.

Note : Assurez-vous d'appuyer sur la touche ALT à gauche de l'écran SPACEBAR L'opération ne s'exécutera pas si vous utilisez d'autres méthodes de travail. ALT clés.

• Instantanément, le Microsoft Visual Basic pour les applications s'ouvre.
• Plus tard, passez à la Insérer onglet.
• Ensuite, sélectionnez Module dans les options.

• Actuellement, il ouvre le code Module .
• Ensuite, écrivez le code suivant dans le fichier Module .

 Sub Add_Sheet_with_Name() Dim sheet_name As String Dim sheet As Object On Error Resume Next sheet_name = InputBox("Please enter sheet name ", _ "Exceldemy") If sheet_name = "" Then Exit Sub Sheets.Add.Name = sheet_name End Sub 

Découpage du code

• Tout d'abord, nous appelons la procédure Sub en tant que Ajouter une feuille_avec_nom .
• Ensuite, nous définissons les types de variables.
• Plus tard, nous avons ajouté le En cas d'erreur, reprendre la suite Ceci ignorera toute erreur.
• Ensuite, nous avons utilisé InputBox pour obtenir le nom de la feuille de l'utilisateur. De plus, nous avons stocké la chaîne de texte de l'option InputBox dans le nom_de_la_fiche variable.
• Ensuite, si le nom_de_la_fiche est vide, alors le code ne sera pas exécuté.
• Enfin, nous utilisons le Ajouter.nom pour nommer la feuille nouvellement créée. Dans ce cas, le nom sera le même que celui de la feuille de calcul de l'UE. nom_de_la_fiche variable.

• A ce moment, appuyez sur la touche Run (⏵) Vous pouvez plutôt appuyer sur F5 sur votre clavier.

• Soudain, il ouvre une boîte de saisie.
• Ici, entrez le nom de la nouvelle feuille. Dans ce cas, nous avons écrit Profit dans la boîte.
• Plus tard, cliquez sur OK .

• Donc, notre code va s'exécuter, et il va ajouter une feuille nommée Profit .

Note : Nous n'avons pas mentionné d'emplacement pour notre feuille. Par défaut, elle est placée avant la feuille active.

Lire la suite : Excel VBA pour ajouter une feuille à un autre classeur (3 exemples pratiques)

2. appliquer Excel VBA pour ajouter une feuille avec un nom avant une feuille spécifique

Dans notre deuxième méthode, nous allons ajouter une feuille avec le nom avant une feuille spécifique. explorons le processus étape par étape.

📌 Des pas :

• Tout d'abord, affichez le code Module comme indiqué dans Méthode 1 .
• Ensuite, écrivez-y le code suivant.

 Sub Add_Sheet_Before_Specific_Sheet() Worksheets("Sales Report").Activate Sheets.Add(Before:=Sheets("Profit")).Name = "Balance Sheet" End Sub 

Découpage du code

• Tout d'abord, nous appelons la procédure Sub en tant que Ajouter une feuille_avant_la_feuille_spécifique .
• Ensuite, nous activons le Rapport sur les ventes Cela permettra de s'assurer que le code sera exécuté si nous sommes sur une autre feuille.
• Ensuite, nous utilisons le Ajouter.nom pour nommer la nouvelle feuille créée. Cette feuille sera créée avant la feuille appelée Profit du classeur. De plus, nous avons nommé la feuille en tant que Bilan .

• Ensuite, exécutez le code comme indiqué dans Méthode 1 .
• Ainsi, il va ajouter une nouvelle feuille Bilan avant la feuille nommée Profit .

Lire la suite : Excel VBA pour ajouter une feuille avec un nom de variable (5 exemples idéaux)

3. utiliser Excel VBA pour ajouter une feuille avec un nom après une feuille spécifique

Dans cette méthode, nous allons ajouter une feuille après la feuille nommée Profit Voyons le processus en détail.

📌 Des pas :

• Dans un premier temps, faites apparaître le code Module comme indiqué dans Méthode 1 .
• Après cela, écrivez le code suivant dans celui-ci.

 Sub Add_Sheet_After_Specific_Sheet() Worksheets("Profit").Activate Sheets.Add(After:=ActiveSheet).Name = "Warehouse" End Sub 

Ce code est presque similaire à celui de Méthode 2 Juste, ici nous avons utilisé le paramètre Après plutôt que Avant Parce que nous voulons ajouter la nouvelle feuille succédant à une feuille spécifique.

• Ensuite, exécutez le code comme indiqué dans Méthode 1 .
• Ainsi, il va ajouter une nouvelle feuille Entrepôt après la feuille nommée Profit .

Lire la suite : Excel VBA pour ajouter une feuille si elle n'existe pas (avec étapes rapides)

4. insérer une feuille avec un nom au début du classeur

Dans cette section, nous allons insérer une nouvelle feuille au début du classeur dans Excel en utilisant la méthode suivante VBA Alors, sans plus tarder, voyons comment nous nous y prenons.

📌 Des pas :

• Dans un premier temps, faites apparaître le code Module comme indiqué dans Méthode 1 .
• Ensuite, écrivez le code suivant dans celui-ci.

 Sub Add_Sheet_Start_Workbook() Sheets.Add(Before:=Sheets(1)).Name = "Company Profile" End Sub 

Ici, nous ajoutons la nouvelle feuille de calcul avant la première feuille du classeur, c'est-à-dire au début du classeur. Par conséquent, il s'agit maintenant de la première feuille. De plus, nous avons nommé la feuille de calcul Profil de l'entreprise .

• Ensuite, exécutez le code comme indiqué dans Méthode 1 .
• Ainsi, il va ajouter une nouvelle feuille Profil de l'entreprise au début du classeur.

Lire la suite : Macro Excel : créer une nouvelle feuille et la renommer (3 exemples idéaux)

5. utilisation d'Excel VBA pour ajouter une feuille à la fin du classeur

Dans cette section, nous allons ajouter une feuille après la dernière feuille du classeur Permettez-moi de vous montrer le processus ci-dessous.

📌 Des pas :

• Principalement, ouvrez le code Module comme indiqué dans Méthode 1 .
• Ensuite, collez-y le code suivant.

 Sub Sheet_End_Workbook() Sheets.Add(After:=Sheets(Sheets.Count)).Name = "Income Statement" End Sub 

Découpage du code

• Tout d'abord, nous appelons la procédure Sub en tant que Sheet_End_Workbook.
• Ensuite, nous utilisons le Ajouter.nom pour nommer la nouvelle feuille créée. Nous allons créer cette feuille après la dernière feuille du classeur. Nous pouvons obtenir le numéro de la dernière feuille à partir de la méthode Feuilles. De plus, nous avons nommé la feuille Compte de résultat .

• Après cela, exécutez le code comme indiqué dans Méthode 1 .
• Ainsi, il va ajouter une nouvelle feuille Compte de résultat à la fin du cahier d'exercices.

Lire la suite : Créer un nouveau classeur et l'enregistrer en utilisant VBA dans Excel

6. introduire plusieurs feuilles en utilisant la valeur de la cellule par Excel VBA

Pour la dernière méthode, nous allons ajouter plusieurs feuilles dans le classeur avec le nom d'une plage de cellules en utilisant Excel. VBA De plus, nous demanderons à l'utilisateur de saisir l'intervalle pour prendre le nom. Donc, regardons les étapes ci-dessous.

📌 Des pas :

• Dans un premier temps, ouvrez le code Module comme indiqué dans Méthode 1 .
• Ensuite, copiez le code suivant et collez-le dedans.

 Sub Add_Multiple_Sheets_Using_Cell_Value() Dim rng As Range Dim cc As Range Set rng = Application.InputBox("Select Cell Range" _ & ; " to Insert Sheets", "ExcelWIKI", Type:=8) Application.ScreenUpdating = False Worksheets("Sales Report").Activate For Each cc In rng Sheets.Add(After:=ActiveSheet).Name = cc.Value Next cc Application.ScreenUpdating = True End Sub 

Découpage du code

• Tout d'abord, nous appelons la sous-procédure Add_Multiple_Sheets_Using_Cell_Value.
• Ensuite, nous définissons les types de variables.
• Ensuite, nous utilisons InputBox pour obtenir la gamme de données de l'utilisateur.
• Quatrièmement, nous activons la feuille Rapport sur les ventes .
• Plus tard, nous utilisons un Pour chaque suivant pour parcourir une par une la plage de cellules sélectionnée.
• Ensuite, nous utilisons le Ajouter.nom pour nommer la nouvelle feuille créée. Nous allons créer ces feuilles après la feuille active. Rapport sur les ventes du cahier d'exercices.

• Maintenant, exécutez le code comme indiqué dans Méthode 1 .
• Instantanément, le Exceldemy s'ouvre.
• Ensuite, donnez aux cellules de la B5:B9 dans la boîte.
• Enfin, cliquez sur OK .

• Enfin, il insérera cinq nommées d'après les valeurs des cellules dans le B5:B9 Ils sont tous après la feuille. Rapport sur les ventes .

Conclusion

Cet article fournit des solutions simples et brèves pour ajouter des feuilles avec des noms par Excel. VBA N'oubliez pas de télécharger le Pratique Merci d'avoir lu cet article, nous espérons qu'il vous a été utile. Si vous avez des questions ou des suggestions, n'hésitez pas à nous en faire part dans la section des commentaires. Veuillez visiter notre site Web. Exceldemy pour en savoir plus.