Imprimer une feuille masquée

olggapt · 8 Septembre 2012

Bonjour les amis

Pour imprimer une feuille masquée, je suis obligé de la rendre visible pour l'imprimer puis de la masquer après l'impression.

Auriez-vous une solution plus élégante ?

merci à vous !

Gelinotte · 8 Septembre 2012

Re : Imprimer une feuille masquée

Bonsoir,

Je ne connais pas d'autre méthode que de faire afficher, imprimer et masquer à nouveau.

Code:

Sub Macro1()
    Sheets("Feuil2").Visible = True
    Sheets("Feuil2").PrintOut Copies:=1, Collate:=True, _
        IgnorePrintAreas:=False
    Sheets("Feuil2").Visible = False
End Sub

G

Robert · 8 Septembre 2012

Re : Imprimer une feuille masquée

Bonsoir le fil, bonsoir le forum,

Moi non plus Gelinotte mais surtout je n'y vois rien d'inélégant...

Modeste geedee · 9 Septembre 2012

Re : Imprimer une feuille masquée

Gelinotte à dit:
Bonsoir,

Je ne connais pas d'autre méthode que de faire afficher, imprimer et masquer à nouveau.

Code:

Sub Macro1() Sheets("Feuil2").Visible = True Sheets("Feuil2").PrintOut Copies:=1, Collate:=True, _ IgnorePrintAreas:=False Sheets("Feuil2").Visible = False End Sub

G

Pour l'élégance... Ajouter en début de procédure
Application.ScreenUpdating=False

Gelinotte · 9 Septembre 2012

Re : Imprimer une feuille masquée

Bonsoir,

Modeste geedee à dit:
Pour l'élégance... Ajouter en début de procédure
Application.ScreenUpdating=False

Oui, merci. J'oublie trop souvent n'étant pas incommodé par un processeur I7; à peine si l'écran émet un petit flash ... ce qui n'est pas élégant bien sûr

G

olggapt · 9 Septembre 2012

Re : Imprimer une feuille masquée

Ok les amis je m'en doutais un peu !
je connaissais le code que vous préconisez
geler l'écran est ce que j'appelle "élégant" !
à bientôt

Imprimer une feuille masquée

olggapt

XLDnaute Junior

Gelinotte

XLDnaute Accro

Robert

XLDnaute Barbatruc

Modeste geedee

XLDnaute Barbatruc

Gelinotte

XLDnaute Accro

olggapt

XLDnaute Junior

Discussions similaires