cmalifarge
XLDnaute Nouveau
bonjour,
j'essaie de créer un classeur pour automatiser mes devis. Depuis hier je bloque sur le problème du nom de feuille.
j'ai construit une macro qui me permet d'automatiser certaines fonctions et notamment de créer un devis lorsque j'ai terminé de remplir les différentes cellules. Ce devis (qui est une nouvelle feuille) j'aimerais le nommer automatiquement du texte d'une cellule spécifique (A5 dans mon exemple) dans laquelle se trouve une date.
ma feuille de départ s'appelle "vierge FEX" et voilà ce que j'ai écrit qui ne marche pas:
Sheets("vierge FEX").Select
Sheets("vierge FEX").Copy Before:=Sheets(17)
Sheets("vierge FEX (2)").Select
Range("A5").Select
Selection.Copy
Sheets("vierge FEX (2)").Name = "A5"
Ma nouvelle feuille se nomme alors A5 au lieu de prendre le contenu de cette cellule.
D'autre part, comment créer de nouveau une autre feuille avec cette même date et qu'elle se nomme également avec la valeur de la cellule A5 sans provoquer de bug.
merci pour votre aide
cordialement
C. Malifarge
j'essaie de créer un classeur pour automatiser mes devis. Depuis hier je bloque sur le problème du nom de feuille.
j'ai construit une macro qui me permet d'automatiser certaines fonctions et notamment de créer un devis lorsque j'ai terminé de remplir les différentes cellules. Ce devis (qui est une nouvelle feuille) j'aimerais le nommer automatiquement du texte d'une cellule spécifique (A5 dans mon exemple) dans laquelle se trouve une date.
ma feuille de départ s'appelle "vierge FEX" et voilà ce que j'ai écrit qui ne marche pas:
Sheets("vierge FEX").Select
Sheets("vierge FEX").Copy Before:=Sheets(17)
Sheets("vierge FEX (2)").Select
Range("A5").Select
Selection.Copy
Sheets("vierge FEX (2)").Name = "A5"
Ma nouvelle feuille se nomme alors A5 au lieu de prendre le contenu de cette cellule.
D'autre part, comment créer de nouveau une autre feuille avec cette même date et qu'elle se nomme également avec la valeur de la cellule A5 sans provoquer de bug.
merci pour votre aide
cordialement
C. Malifarge