Macro pour renommer feuille Excel Fermé

Question

Bonjour à tous,

Je mets actuellement en place un fichier avec plusieurs feuilles.

Je souhaiterai pouvoir nommer les feuilles en fonction du contenu des cellules d’une feuille de saisie.

Pour commencer, ma feuille de saisie sera située en 3eme position sur 43 dans la liste des feuilles.

A partir de là, le contenu que je souhaite recuperer pour nommer les feuilles Feuil1, Feuil2….Feuil40 se situe à partir de la cellule BD10, BF10…..ED10.

En clair le contenu de la cellule BD10 de la feuille de saisie nomme la Feuil1, BF10 nomme la Feuil2…..ED10 nomme la Feuil40

J’ai essayé quelques macros mais je n’arrive pas à l’adapter à mon fichier.

Merci de votre aide.

Mike-31 · Answer

Salut

Essayes ce code associé à un bouton

Sub Macro1()
'
   Sheets("ma feuille de saisie ").Select
   Feuil1.Name = Range("BD10")
   Feuil2.Name = Range("BF10")
   
  ' etc ...
   
End Sub


A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)

nyko78 · Answer

Ok merci pour cette proposition.

Cependant, je n'arrive pas à appliquer la macro.

Lorsque j'enregistre la macro dans VBA je change le champ suivant par le vrai mon de ma feuille:

Sheets("ma feuille de saisie ").Select  par Sheets(Saisie).Select.

Il y a t'il un moyen d'eviter le bouton et meme d'eviter une macro afin que me fichier ne soit trop volumineux.

Merci encore

Mike-31 · Answer

Salut,

Pour compléter cette discussion, même si les feuilles ont été renommées (clic droit renommer), elles conservent leurs codages Excel et dans les propriétés feuilles on peut lire Feuil1(nom de la feuille) dans ce cas le code se simplifie à 

Sub Macro1()
    Feuil1.Name = Feuil3.[BD10]
    Feuil2.Name = Feuil3.[BF10]
    Feuil3.Name = Feuil3.[ED10]
   
etc ...
etc ...

End Sub

Si les feuilles ont été renommées dans la propriété, il faudra en tenir compte dans le code.

Le VBA est indispensable pour automatiser cette attente, par contre il peut effectivement être déclenché automatiquement lorsqu’une valeur change dans la plage de cellule concernant les noms de feuille BD10, BF10 etc …
Si tu rencontre un problème, je te ferai un petit montage

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)

Macro pour renommer feuille Excel

3 réponses

Discussions similaires