Boite de dialogue impression

[tiberus]

Bonsoir

Je me permets de faire appel à vos lumières. Je cherche à imprimer des pages par une macro (qui détermine le nombre de pages à imprimer, le type d'imprimante à utiliser). Tout fonctionne très bien, si ce n'est que j'aimerais éviter qu'Excel n'affiche à chaque fois la boite de dialogue Imprimer. J'ai bien essayé avec Application.Displayalerts = False en début de macro, mais ça ne marche pas. J'ai bien trouvé une instruction: Application.DialogPrint.Show, mais j'aimerais son contraire (Hide plutôt que Show). Quelqu'un aura-t-il l'amabilté de me guider? Merci d'avance

tiberus

 

[PascalXLD]

Bonjour

Fil déplacé dans le bon forum

 

[PascalXLD]

RE

Je ne comprends pas trop ton problème

avec un eligne de code de ce genre tu n'as pas de boite de dialogue

Sheets('Feuil1').PrintOut Copies:=1

Bonne journée

 

[tiberus]

Oui, désolé, je me suis mal exprimé. J'ai effectivement une instruction ActiveSheet.SelectedSheets.PrintOut Copies:=1 Le message qui apparaît n'est pas la boîte de dialogue où il faut choisir le nombre de copies, mais un message qui s'affiche quelques secondes, où il est indiqué un message du style: Copies de 1/1, sur imprimante XY

Comme la macro imprime en boucle des feuilles différentes, cette boite d'information s'ouvre et se referme souvent. Or, j'aimerais qu'aucun message de confirmation ne s'affiche lorsque j'ai cliqué sur la macro.
As-tu une idée?

 

[PascalXLD]

Ok je n'avais compris cette boite là et là ma réponse est : non je ne sais pas la retirer je ne sais même pas si c'est possible ...


PS inutile de doubler les posts pour le suivi du fil ça va être dur

 

[Hellboy]

Bonjour tiberus, Pascal76

As-tu essayé avec la commande suivante ?

Application.ScreenUpdating = False

 

[tiberus]

Salut Pacal76

Oui, j'avais déjà essayé avec ScreenUpdating=False. Ça ne marche pas. Le non rafraîchissement de l'écran n'empêche pas l'apparition du message.

Merci quand même

tiberus

 

[PascalXLD]

RE

Heu C'est Hellboy qui a proposé la solution

Rendons à césar ....

 

[Hellboy]

Bonjour a vous deux

Merci ! Pascal76

Il existe une autre commande non recommander:

Application.Visible = False
' Print
Application.Visible = True

Si ta commande plante, Excel ne sera plus visible !