Je coince depuis pas mal de temps sans trouver la raison de l'erreur 1004
sur ces deux lignes ! :-(
Mon fichier xls contient deux feuilles. La première "BASE"(NomFeuilleBase)
et la deuxième "FEUIL1"(NomFeuille)
Ce que je veux faire, c'est copier la feuille "BASE" et ensuite la
renommer. Donc, je copie la feuille "Base" après la feuille "Feuil1" et
ensuite je la renomme
La première ligne (copy) fonctionne.C'est la deuxième ligne qui me donne un
message d'erreur.
With objWorkbook
.Worksheets(NomFeuilleBase).Copy
After:=.Worksheets(NomFeuille)
.Worksheets(Sheets.Count).Name = "027 BUD" & " " &
ResultNo_Quest
End With
Je ne sais pas comment faire pour résoudre ce problème.