GuillaumA
XLDnaute Occasionnel
Bonjour à tous,
J'utilise actuellement une macro afin d'imprimer directement une feuille excel.
Cette macro lance une fenêtre de confirmation OUI ou NON pour imprimer.
Seulement voila, je ne suis pas très bon en VBA et je rencontre deux erreurs:
1 - Quand je clique sur OUI cela imprime mais deux fois au lieu d'une
Quand je clique sur NON cela imprime quand même mais en 1 exemplaire...
2- Malgrès ma volonté de faire apparaître mon tableau sur une page A4 entière, le tableau est diminué a tel point qu'il ne prend qu'1/4 de la feuille. Hors ce tableau possède environ 80 lignes d'ou mon problème de lisibilité =p
Toute aide me sera fort précieuse et je vous remercie d'avance pour vos réponses!
Cordialement,
Guillaume A.
Ma macro:
J'utilise actuellement une macro afin d'imprimer directement une feuille excel.
Cette macro lance une fenêtre de confirmation OUI ou NON pour imprimer.
Seulement voila, je ne suis pas très bon en VBA et je rencontre deux erreurs:
1 - Quand je clique sur OUI cela imprime mais deux fois au lieu d'une
Quand je clique sur NON cela imprime quand même mais en 1 exemplaire...
2- Malgrès ma volonté de faire apparaître mon tableau sur une page A4 entière, le tableau est diminué a tel point qu'il ne prend qu'1/4 de la feuille. Hors ce tableau possède environ 80 lignes d'ou mon problème de lisibilité =p
Toute aide me sera fort précieuse et je vous remercie d'avance pour vos réponses!
Cordialement,
Guillaume A.
Ma macro:
Sub impression()
If MsgBox("Voulez vous imprimer le travail ?", vbYesNo) = vbYes Then ActiveSheet.PrintOut
With ActiveSheet
With .PageSetup
.Orientation = xlLandscape '
.BlackAndWhite = True
End With
.PrintOut Copies:=1
End With
End Sub