Hello,
la sélection de la 'bonne' feuille dans le fichier BD.xls ne se fait pas car elle n'est pas implémentée . Pour le moment, le programme écrit 'bonjour' dans la dernière feuille active du fichier BD.xls.
Tu peux t'en rendre compte facilement :
- ouvre le fichier BD.xls
- sélectionne PAGE1
- sauvegarde puis ferme le fichier
à chaque fois que tu lanceras ta macro, elle écrira dans la PAGE1, que tu écrives PAGE1 ou PAGE2 ou TITI ou TOTO dans la cellule A1 du classeur FORMULAIRE.xls.
Pour résoudre leproblème, il faut que tu stockes la valeur inscrite dans la cellule A1 de FORMULAIRES.xls
NomPage = Cells(1, 1).Value
puis que tu actives la feuille NomPage dans BD.xls avant de faire la copie
LePapat
PS : Attention si tu veux sélectionner la feuille nommée "2" du classeur FORMULAIRE.xls, il vaut mieux écrire Sheets("2").Select car dans ton code tu appelles la 2éme feuille du classeur qui peut s'appeller "3", "4", voire "1"
Partager