Probleme sur une macro pour impression

[keurma]

Bonjour,

J'ai installé la macro suivante sur le bouton d'une page afin que lorsque je clique sur le bouton cela n'imprime que la premiere page de la feuille. Ca marchait trés bien jusqu'a hier. Maintenant lorsque j'appuie sur le bouton ca m'imprique les 4 pages que comprend la feuille ??!!! vous savez d'ou vient le probleme ?

Merci

Sub Macro8()
'
'
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate _
:=True
End Sub

 

[LPandre]

Re : Probleme sur une macro pour impression

Bonjour,

j'ignore si j'ai bien compris :

Si tu veux imprimer une feuille d'un fichier, il faut indiquer la feuille à imprimer :

****
Sheets("Feuil1").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

****
Si tu veux imprimer une page d'une feuille qui parce qu'elle à une zone d'impression qui ne tient pas en une seule page lisible, il est préférable de délimiter la zone à imprimmer, soit en la nomant, soit en la définissant.

***
Sheets("Feuil1").Select
Range("A26:B28").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

***
Cordialement