F
FlashVB
Guest
Bonjour à tous,
Ma demande est la suivante : le code suivant me permet d'imprimer une feuille mais je souhaiterais imprimer le classeur en entier ou quelques feuilles de ce classeur. Quelqu'un peut-il m'aider à modifier ce code ?
Merci.
Sub PrintAS()
Range("A348").Select
ActiveSheet.PageSetup.PrintArea = "$A$3:$P$48"
Range("A3").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
FlashVb
Ma demande est la suivante : le code suivant me permet d'imprimer une feuille mais je souhaiterais imprimer le classeur en entier ou quelques feuilles de ce classeur. Quelqu'un peut-il m'aider à modifier ce code ?
Merci.
Sub PrintAS()
Range("A348").Select
ActiveSheet.PageSetup.PrintArea = "$A$3:$P$48"
Range("A3").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
FlashVb