Passer au contenu principal

Comment rendre le nom de l'onglet de la feuille égal à la valeur de la cellule dans Excel?

Dans certains cas, vous devrez peut-être renommer une feuille de calcul en fonction d'une valeur de cellule spécifiée. Dans cet article, nous allons vous montrer des méthodes pour rendre le nom de l'onglet de la feuille égal à la valeur de la cellule dans Excel.

Rendre le nom de l'onglet de la feuille égal à la valeur de la cellule avec le code VBA
Rendre le nom de l'onglet de la feuille égal à la valeur de la cellule avec Kutools for Excel


Rendre le nom de l'onglet de la feuille égal à la valeur de la cellule avec le code VBA

Avec le code VBA suivant, vous pouvez rendre le nom de l'onglet de feuille égal à la valeur de la cellule automatiquement.

1. Cliquez avec le bouton droit sur l'onglet de la feuille dont vous souhaitez que le nom de la feuille soit égal à la valeur de la cellule, puis cliquez sur Voir le code dans le menu contextuel. Voir la capture d'écran:

2. Copiez et collez le code ci-dessous dans la fenêtre Code, puis appuyez sur autre + Q simultanément pour fermer la fenêtre Microsoft Visual Basic pour Applications.

Code VBA: rendre l'onglet de la feuille égal à la valeur de la cellule

Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20230130
    On Error Resume Next
    If Not Intersect(Target, Range("A1")) Is Nothing Then
        ActiveSheet.Name = ActiveSheet.Range("A1")
    ElseIf Not Intersect(Target.Dependents, Range("A1")) Then
        ActiveSheet.Name = ActiveSheet.Range("A1")
    End If
End Sub

Notes: Dans le code, A1 est la cellule qui contient la valeur que vous devez utiliser comme nom de feuille. Vous pouvez le modifier selon vos besoins.

À partir de maintenant, lorsque la valeur de la cellule A1 a changé, le nom de l'onglet de la feuille sera également modifié.


Rendre le nom de l'onglet de la feuille égal à la valeur de la cellule avec Kutools for Excel

Dans cette section, nous vous présentons le Renommer plusieurs feuilles de calcul utilité de Kutools for Excel. Avec cet utilitaire, vous pouvez facilement renommer les feuilles de calcul avec la valeur de certaines cellules dans Excel.

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

1. Cliquez Kutools Plus > Feuille > Renommer plusieurs feuilles de calcul. Voir la capture d'écran:

2. dans le Renommer plusieurs feuilles de calcul boîte de dialogue, vous devez procéder comme suit.

1). Vérifiez les noms de feuille de calcul que vous souhaitez renommer dans le Fiches boîte (vous pouvez sélectionner une ou plusieurs feuilles).
2). Sélectionner Remplacer le nom de la feuille d'origine boîte dans la Renommer les options .
3). Si vous souhaitez renommer une feuille de calcul ou plusieurs feuilles de calcul avec la valeur de cellule spécifiée, veuillez sélectionner le À partir d'une gamme spécifique et sélectionnez la plage de cellules sur laquelle vous souhaitez renommer les feuilles.
4). Clique le OK bouton. Voir la capture d'écran:

Vous pouvez voir que les feuilles de calcul sélectionnées sont renommées immédiatement par la valeur de plage spécifiée, comme illustré ci-dessous.

Notes:

1. Vous pouvez utiliser le Filtre fonction pour filtrer facilement la feuille de calcul nécessaire s'il existe de nombreuses feuilles de calcul.
2. Si vous souhaitez renommer plusieurs feuilles de calcul avec une certaine valeur de cellule dans chaque feuille. Par exemple, feuille1 sera égale à la valeur de sa cellule A1 et feuille2 sera également égale à la valeur de sa cellule A1. Veuillez sélectionner des feuilles de calcul dans le Fiches , puis sélectionnez le Renommer les feuilles de calcul avec une cellule spécifique et spécifiez la cellule A1 dans la zone.

3. Le nom de la feuille ne sera pas changé automatiquement avec les changements de valeur de cellule.

  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.


Rendre le nom de l'onglet de la feuille égal à la valeur de la cellule avec Kutools for Excel

Meilleurs outils de productivité bureautique

🤖 Aide à l'IA Kutools: Révolutionner l'analyse des données en s'appuyant sur : Exécution intelligente   |  Générer du code  |  Créer des formules personnalisées  |  Analyser les données et générer des graphiques  |  Invoquer les fonctions Kutools...
Caractéristiques populaires: Rechercher, mettre en évidence ou identifier les doublons   |  Supprimer les lignes vides   |  Combinez des colonnes ou des cellules sans perdre de données   |   Tour sans formule 
Super recherche: VSearchup à critères multiples    VSearch à valeurs multiples  |   Recherche virtuelle sur plusieurs feuilles   |   Recherche floue ....
Liste déroulante avancée: Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple ....
Gestionnaire de colonnes: Ajouter un nombre spécifique de colonnes  |  Déplacer les colonnes  |  Basculer l'état de visibilité des colonnes masquées  |  Comparer les plages et les colonnes 
Caractéristiques en vedette: Mise au point de la grille   |  Voir Design   |   Grande barre de formule    Gestionnaire de classeurs et de feuilles   |  Centre de ressources (Texte automatique)   |  Sélecteur de date   |  Combiner des feuilles de travail   |  Crypter/déchiffrer les cellules    Envoyer des e-mails par liste   |  Super filtre   |   Filtre spécial (filtre gras/italique/barré...) ...
Les 15 meilleurs ensembles d'outils12 Texte Outils (Ajouter du texte, Supprimer les caractères, ...)   |   50+ Graphique Types (Diagramme de Gantt, ...)   |   40+ Pratique Formules (Calculer l'âge en fonction de l'anniversaire, ...)   |   19 Insertion Outils (Insérer le code QR, Insérer une image à partir du chemin, ...)   |   12 Conversion Outils (Nombres en mots, Conversion des devises, ...)   |   7 Fusionner et fractionner Outils (Lignes de combinaison avancées, Cellules divisés, ...)   |   ... et plus

Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps.  Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...

Description


Office Tab apporte une interface à onglets à Office et facilite grandement 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!
Comments (30)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Good
It was the same thing I was looking for. But now I have a question:
After these steps were done, I created several sheets, I locked the sheet, but when I lock the book and enter a value in the cell, the name of the sheet does not change. In other words, it only changes with the spreadsheet unlocked and I would like to keep the spreadsheet locked
This comment was minimized by the moderator on the site
Boas
Era mesmo isto que estava a procurar. Mas agora tenho uma questão:
Após esses passos feitos, criei várias sheet, bloqueei a folha, mas quando bloqueio o livro e digito um valor na célula, o nome da sheet não muda. Ou seja, só muda com a sheet desbloqueada e gostaria de manter a sheet bloqueada
This comment was minimized by the moderator on the site
bonjour,
que voulez-vous dire par appuyer autre autre+q dans le code vba après avoir collé.
J'ai simplement fermé la page après avoir collé et ça ne marche pas
merci
This comment was minimized by the moderator on the site
worked beautifully!
This comment was minimized by the moderator on the site
Hi Crystal,

When i paste in your code it comes back with error "user-defined type not defined"?

Thanks.
This comment was minimized by the moderator on the site
Hi Tom J,
Make sure these three options are checked in the References - VBAProject dialog box.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/error.png
This comment was minimized by the moderator on the site
This worked perfectly for my first worksheet, but not for the second or third etc (I have up to about 20 worksheets that all need this function). Am I missing something?
This comment was minimized by the moderator on the site
Hi A Owen,
This code only works for one worksheet per time. Sorry for the inconvenience.
This comment was minimized by the moderator on the site
What is the highest nr of worksheets, that can be changed names via Kutools Plus? because the excel letting me only 17 names to changes, and that's it
This comment was minimized by the moderator on the site
I'm using your exact code from the above for VBA code which works perfectly for what I need. However, I have a bunch of macros on a sheet called Job Template that gets copied and reused for every new job. I designed all my macros based on a new copied version called Job Template (2). Once the sheet name is changed to the new job name, the macros no longer work and have to manually do it. I would like to be able to use any of my Macro buttons at any point instead of only using them before I change the sheet name.

Is there a way for the VBA code to always refer to the sheet name before running the rest of the code functions?
This comment was minimized by the moderator on the site
How can I reference two cells. for example name and id number?
This comment was minimized by the moderator on the site
This is exactly what I need, but I need the tab to recreate a date and it isn't working... I assume this is something to do with the way excel works out date and time, can anyone suggest a workaround?
This comment was minimized by the moderator on the site
Hi Nick,
Excel does not support typing the sheet name containing special characters. If the date you type contains the character /, it won't allow you to create the sheet name with that date.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations