Discussion :

[vstauffer]

Bonjour à tous, débutant en macros avec Excel (2019) et j’aurais besoin de votre aide pour résoudre le problème suivant.
Je dois écrire une macro qui n’imprime que certaines feuilles du classeur.
Ma macro construit la liste des feuilles à imprimer dans une variable de type chaine appelé fchaine
contenant par exemple la chaine « array("feuil2", "feuil2", "feuil4") »
L’instruction : Sheets(fchaine).PrintOut
provoque une erreur d’exécution 9
car il n’y à pas de feuille nommée fchaine dans le classeur.
Car contre si j’écris l’instruction :
Sheets(array("feuil2", "feuil3", "feuil4") ).PrintOut elle fonctionne parfaitement.

Comment faire pour que fchaine soit remplacé par son contenu à l’exécution ?
Merci de votre aide.

[Patrice740]

Bonjour,

Ma macro construit la liste des feuilles à imprimer dans une variable de type chaine appelé fchaine
contenant par exemple la chaine « array("feuil2", "feuil2", "feuil4") »

C'est une incompatibilité de type de variable : erreur 13 !!!



L'erreur 9 c'est quand la ou les feuilles n'existent pas (erreur d'indice).

[vstauffer]

Le problème n'est pas là.
J'ai bien une chaine contenant contenant l'expression à écrire dans l'expression sheets(fchaine).printout
mais à l’exécution Excel n’accepte pas le sheets(fchaine) car fchaine n'est la le nom d'une feuille.
Il faudrait à l'exécution que fchaine soit remplacé par la valeur c'est à dire array("feuil2", "feuil", "feuil4")
je n'arrive pas à contourner ce problème...

[Patrice740]

Re,

...contenant par exemple la chaine « array("feuil2", "feuil2", "feuil4") »

Le problème n'est pas là.... array("feuil2", "feuil", "feuil4")

Si tu fais autant d'erreurs dans ton code que dans tes posts, ça peut expliquer pourquoi tu as une erreur 9 ....
Contrairement à tes affirmations, fchaine ne peut pas être une variable chaine !!! (cf. mon post précédent)

Sans voir le code en entier difficile de répondre : postes le, balisé par le bouton #.

[vstauffer]

J'ai résolu mon problème en utilisant la fonction :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ThisWorkbook.PrintOut from:=2, to:=y

les pages que j'avais à imprimer se suivent toujours de la page 2 à une page y qui change suivant le cas

merci à tous