Probleme de macro d'impression

pulnoy

XLDnaute Nouveau
Bonjour à vous,

C'est la première fois que je post et je me permet de vous embêter parce que je ne trouve ma solution nul part !

J'aimerais faire une macro d'impression qui imprime de la feuille [1] à feuille [résultat d'une formule].
J'ai essayé de faire ça tout seul avec google et je suis arrivé à :

Code:
MsgBox [Feuil2!F3]
    ActiveWindow.SelectedSheets.PrintOut From:=1, To:=[Feuil2!F2], Copies:=1, Collate _
        :=True
    Sheets("Feuil4").Select
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
    Sheets("Feuil1").Select

La MsgBox me dit de mettre x feuille dans l'imprimante ça c'est cool ça marche.

Mais après il devrait imprimer les x feuilles + 1 autre onglet et il m'imprime systématiquement 1 feuille et l'onglet !

Je comprends vraiment pas mais je suis pas un crack du tout du tout...

Je suis preneur de toutes suggestion ! Merci !
 

pulnoy

XLDnaute Nouveau
Re : Probleme de macro d'impression

Désolé finalement il a suffit que je post pour que je trouve la réponse seul !
En fait c'était ok jusque que j'avais défini la zone d'impression que pour une page alors qu'il fallait tout sélectionner !
 
Haut Bas