Note: The other languages of the website are Google-translated. Back to English
English English

Comment ajouter une nouvelle feuille avec un nom spécifique dans Excel?

Parfois, vous souhaitez créer une nouvelle feuille et la nommer automatiquement avec un nom spécifique dans Excel. Dans cet article, nous allons vous montrer deux méthodes pour ajouter une nouvelle feuille avec un nom spécifique dans le classeur actuel, ainsi que pour créer une feuille de calcul avec un nom spécifique dans un nouveau classeur dans Excel.

Ajout automatique d'une nouvelle feuille avec un nom spécifique dans le classeur actuel avec le code VBA
Ajout automatique d'une nouvelle feuille avec un nom spécifique dans un nouveau classeur avec Kutools for Excel


Ajout automatique d'une nouvelle feuille avec un nom spécifique dans le classeur actuel avec le code VBA


Vous pouvez ajouter une nouvelle feuille avec un certain nom à la fin du classeur actuel avec le code VBA suivant.

1. presse autre + F11 touches simultanément pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module.

3. Copiez et collez ci-dessous le code VBA dans le Module fenêtre.

Code VBA: ajouter une nouvelle feuille avec un nom spécifique à la fin du classeur actuel

Sub CreateSheet()
'Updated by ExtendOffice 20181009
    Dim xName As String
    Dim xSht As Object
    On Error Resume Next
    xName = InputBox("Please enter a name for this new sheet ", "Kutools for Excel")
    If xName = "" Then Exit Sub
        Set xSht = Sheets(xName)
        If Not xSht Is Nothing Then
            MsgBox "Sheet cannot be created as there is already a worksheet with the same name in this workbook"
            Exit Sub
            End If
            Sheets.Add(, Sheets(Sheets.count)).Name = xName
        End Sub

4. presse F5 clé pour exécuter le code. Dans le popping Kutools pour Excel boîte de dialogue, entrez un nom pour cette feuille, puis cliquez sur le OK bouton. Voir la capture d'écran:

Ensuite, une nouvelle feuille de calcul est créée avec un nom spécifique et située à la fin du classeur actuel.


Ajout automatique d'une nouvelle feuille avec un nom spécifique dans un nouveau classeur avec Kutools for Excel

Dans cette section, nous présenterons le Créer des feuilles de calcul de séquence utilité de Kutools pour Excel. Avec cet utilitaire, vous pouvez facilement ajouter une nouvelle feuille avec un nom spécifique dans un nouveau classeur.

Avant d'appliquer Kutools pour Excel, S'il vous plaît téléchargez et installez-le d'abord.

1. Pour ajouter une nouvelle feuille avec un nom spécifique, vous devez saisir ce nom dans une cellule à l'avance. Et puis cliquez Kutools Plus > Feuille > Créer des feuilles de calcul de séquence.

2. dans le Créer des feuilles de calcul de séquence boîte de dialogue, sélectionnez Feuille de calcul vierge dans le Feuille de travail de base liste déroulante, sélectionnez Donnéesdans une gamme et spécifiez la cellule contenant le nom de la feuille de calcul, puis cliquez sur le bouton OK bouton. Voir la capture d'écran:

Ensuite, une nouvelle feuille de calcul portant ce nom spécifique à partir d'une cellule est créée immédiatement dans un nouveau classeur.

Notes:

1. Si vous souhaitez créer plusieurs nouvelles feuilles avec des noms spécifiques en même temps, veuillez entrer ces noms dans les cellules une par une, puis sélectionnez ces cellules dans le Données dans une plage boîte.
2. Vous pouvez également créer des feuilles de calcul de séquence à partir d'un numéro de série ou d'une liste personnalisée avec ce Créer des feuilles de calcul de séquence utilitaire. Voir la capture d'écran:

  Si vous souhaitez bénéficier d'un essai gratuit (30 jours) de cet utilitaire, veuillez cliquer pour le télécharger, puis passez à appliquer l'opération selon les étapes ci-dessus.


Les meilleurs outils de productivité de bureau

Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%

  • Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtréeplus
  • Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammesplus
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellulesplus
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDFplus
  • Plus de 300 fonctionnalités puissantes. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Essai gratuit de 30 jours. Garantie de remboursement de 60 jours.
onglet kte 201905

Office Tab apporte une interface à onglets à Office et simplifie considérablement votre travail

  • Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!
bas de cabine
Commentaires (5)
Pas encore de notes. Soyez le premier à évaluer!
Ce commentaire a été minimisé par le modérateur sur le site
Salut, je suis assez nouveau sur VBA, le code ci-dessus fonctionne très bien pour ajouter une nouvelle feuille de calcul et la renommer, mais je voudrais ensuite qu'il copie et colle automatiquement le contenu de ma feuille "modèle" dans la nouvelle feuille? Quelqu'un peut-il aider s'il vous plaît?

Merci
Ce commentaire a été minimisé par le modérateur sur le site
Bonne journée,
Veuillez essayer le code VBA ci-dessous. J'espère que cela peut aider. Merci pour votre commentaire.

Sous-CréerFeuille()
Dim xName As String
Dim xSht comme objet
Dim xNWS en tant que feuille de travail
On Error Resume Next
xName = Application.InputBox("Veuillez entrer un nom pour cette nouvelle feuille ", "Kutools for Excel")
Si xName = "" alors quitter le sous-marin
Set xSht = Sheets(xName)
Si non xSht n'est rien alors
MsgBox "La feuille ne peut pas être créée car il existe déjà une feuille de calcul portant le même nom dans ce classeur"
Exit Sub
Si fin
ActiveSheet.Copy after :=Feuilles(Feuilles.nombre)
Définir xNWS = Feuilles(Feuilles.nombre)
xNWS.Name = xName
End Sub
Ce commentaire a été minimisé par le modérateur sur le site
Merci pour ta réponse cristal ! Je l'ai fonctionne maintenant :)
Ce commentaire a été minimisé par le modérateur sur le site
Bonjour, cela ne tient pas correctement compte du fait que l'utilisateur clique sur annuler. Il crée toujours une feuille de calcul.
Ce commentaire a été minimisé par le modérateur sur le site
Hi
Le code a été mis à jour avec la résolution de problèmes. S'il vous plaît essayez et merci pour votre commentaire.
Il n'y a pas encore de commentaires postés ici
Laisser vos commentaires
Publier en tant qu'invité
×
Évaluez cet article:
0   Personnages
Emplacements suggérés