H
highlander
Guest
bonjour,
J'ai créer un fichier excel avec des macro.
L'une d'elle me permet de changer le nom de l'onglet en fonction d'un nom rentrer dans la feuille 1
voici le code :
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
ActiveSheet.Name = Range("a1").Value
End Sub
elle se trouve dans Thisworkbook
et est reprise dans le module 1
Le problème c'est que quand je vais sur une feuille, ca met enormement de temps, car ca change quand on clique sur la feuille
je voudrais donc pouvoir créer un bouton dans la feuille 1 : bouton renommer les onglets et qu'il renomme les onglets quand on clique dessus.
j'ai essayer de recopier mon code dedans mais il ne le prend pas en compte
sachant que le nom de l'onglet correspond au nom inscrit dans la case A1 de chaque feuille. Et que ce nom depend d'une case dans la feuille 1
si qu'elqu'un pouvait m'aider ce sera cool
merci
J'ai créer un fichier excel avec des macro.
L'une d'elle me permet de changer le nom de l'onglet en fonction d'un nom rentrer dans la feuille 1
voici le code :
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
ActiveSheet.Name = Range("a1").Value
End Sub
elle se trouve dans Thisworkbook
et est reprise dans le module 1
Le problème c'est que quand je vais sur une feuille, ca met enormement de temps, car ca change quand on clique sur la feuille
je voudrais donc pouvoir créer un bouton dans la feuille 1 : bouton renommer les onglets et qu'il renomme les onglets quand on clique dessus.
j'ai essayer de recopier mon code dedans mais il ne le prend pas en compte
sachant que le nom de l'onglet correspond au nom inscrit dans la case A1 de chaque feuille. Et que ce nom depend d'une case dans la feuille 1
si qu'elqu'un pouvait m'aider ce sera cool
merci
