Renommer les onglets en fonction d'une celulle de chacun d'entre eux

Bonjour à tous,

Je dois mettre en place un fichier mais j'ai besoin de vos compétences sur Excel pour un code VBA.

Je souhaiterais que chaque ongle "Mois" soit renommer par sa cellule en J1 automatiquement lorsque je modifie l'année de la cellule B3 de l'onglet "Données".

De même, pour les onglets "Ctrl...", ceux ci devraient être renommées automatiquement à chaque changement de sa cellule D7 et seraient renommées par la valeur de sa cellule J1.

En résumé chaque onglet devra être renommé par sa cellule J1 mais l’événement est différent pour l’onglet "Mois" et "ctrl".

Je suis allé voir sur le forum mais je n'arrive pas a obtenir ce que je souhaite, je demande donc votre aide.(fichier joint)

Merci d'avance

19fichier-test.xlsm (150.14 Ko)

Bonjour

Tous les onglets que tu veux nenommer ont "janvier 2018" comme valeur, donnée par une formule.

Il est donc impossible de donner ce même nom à plusieurs onglets.

Bye !

Bonjour,

Effectivement je remets le fichier avec des mois différents !

Désolé, lors du duplicata du mois de janvier j'ai omis de changer la formule en J1,

Cordialement,

12fichier-test.xlsm (149.73 Ko)

Bonjour

voila le principe pour la modification des noms onglet

a+

Maurice

Sub test()
An = "2018"
    Feuil1.Name = "Janvier " & An
    Feuil3.Name = "Février " & An
    Feuil4.Name = "Mars " & An
    Feuil5.Name = "Avril " & An
    Feuil6.Name = "Mai " & An
    Feuil7.Name = "Juin " & An
    Feuil8.Name = "Juillet " & An
    Feuil9.Name = "Aout " & An
    Feuil10.Name = "Sept. " & An
    Feuil11.Name = "Oct. " & An
    Feuil12.Name = "Nov. " & An
    Feuil13.Name = "Déc. " & An
End Sub

Bonjour,

Merci pour votre retour, effectivement cela fonctionne.

Peut on cependant au lieu de revenir sur le code macro pour définir l'année, rattachée la cellule B3 de l'onglet "Données" à cette valeur 'An.

Une idée pour le Ctrl?,

Merci beaucoup pour votre retour

Bonjour,

Le code à ajouté que je demandais au post précédent est trouvé aprés des recherches sur le forum :

ThisWorkbook.Names("MonNomDefini").RefersToRange.Value

à la place de 2018.

Il me reste donc la partir des onglets Ctrl, merci pour l'aide qui me sera apportée,

Cordialement,

Bonjour

hum if faut apprendre un peux les macro

Bon voila ton fichier avec un bouton

tu change année et tu click sur le bouton

A+

Maurice

20fichier-test-2.xlsm (166.15 Ko)

Bonjour Archer,

Merci pour ton retour, mais ce que tu m’envoies est déjà résolu par le post précédent!

Ce qui me reste à voir c'est comment changer la date des onglet CTrl,

Cordialement,

Un essai à tester. Te convient-il ?

Bye !

25fichier-test-v1.xlsm (158.71 Ko)

Bonjour gmb,

C'est exactement ce que je souhaitais,

Merci beaucoup,

Cordialement,

Rechercher des sujets similaires à "renommer onglets fonction celulle chacun entre"