Bonjour,
J'ai donc un classeur. Toutes les propriétés de ce classeur sont définies comme tel:
Une fois toutes les propriétés rentrées, je souhaite renommer chaque colonne. Je les selectionnes comme ceci:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 Variable_PN = InputBox("Entrez le chemin du fichier de variable PN :", "Variable PN") Nom_Classeur_VarPN = InputBox("Entrez le nom du fichier :", "Variable PN", "Nom.xls") Nom_Feuille_VarPN = InputBox("Entrez le nom de la feuille :", "Vairiable PN", "Nom")
Et puis j'essaie de la renommer comme ca, mais ca ne fait rien:
Code : Sélectionner tout - Visualiser dans une fenêtre à part Workbooks(Nom_Classeur_VarPN).Worksheets(Nom_Feuille_VarPN).Columns("A:A").Select
Code : Sélectionner tout - Visualiser dans une fenêtre à part ActiveWorkbook.Names.Add Name:="Matricule", RefersToR1C1:="=Nom_Feuille_VarPN!C1"
Donc si quelqu'un voit comment faire, je suis preneur.
Partager