Modification des onglets

[Mu 12]

Bonjour.

Est il possible de modifier automatiquement les noms des onglets (contenu dans un événement --> Sheets('Nom de la page').Range('A13') par exemple) lorsqu'on les modifie sur excel (en les renommant).

Merci d'avance

 

[john]

Salut,

Si je comprend bien, tu veux que telle ou telle cellule ai comme valeur le nom de la feuille même si tu change le nom de celle-ci !!!!

si c'est ça que tu veux, tu dois faire une fonction comme celle qui suit :

Function change_nom()
nom_feuille = ActiveSheet.Name
change_nom = nom_feuille
End Function

Et dans la cellule où tu veux que le nom de la feuille s'affiche tu tapes ceci :
=change_nom() 'tu appels ta fonction comme ça )

Bonne fin de journée.

John

 

[Charly2]

Bonsoir à tous les deux,

J'ai compris comme John, mais pour que la mise à jour soit automatique, je te conseille d'y ajouter la méthode 'Volatile' de l'objet Application (exemple de John) :

Function change_nom()
  Application.Volatile
  change_nom = ActiveSheet.Name
End Function

Amicalement
Charly

 

[Charly2]

Re,

Si ça n'est pas cela que tu souhaites, il te faut utiliser le CodeName qui, lui, ne change pas, même si tu renommes ta feuille.

Par exemple, si tu as une feuille qui s'appelle Feuil1 (Planning 1er Semestre) et que tu la renommes en : 'Planning 2nd semestre', le CodeName restera Feuil1.

Et ainsi, au lieu d'utiliser le nom de la feuille (propriété Name), tu utilises la propriété CodeName :

Feuil1.Range('A13')

Cela te permet de faire référence à la même feuille quelque soit le nom que tu lui donnes...

Amicalement
Charly

 

[Mu 12]

Merci à tous pour votre aide.

Ca fonctionne parfaitement.

Mu 12