Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Réglages d'impression - Imprimer la page non affichée !

W

Willy

Guest
Bonjour le forum,

La procédure suivante permet à l'utilisateur soit d'imprimer directement la feuille FORMULAIRE_FORMATION avec les réglages d'impression par défaut soit de sélectionner les réglages.

Private Sub monBoutonImprimer()

Dim Question

Const Mess1 = "Voulez-vous changer les réglages d'impression ?"
Const Mess2 = "Si vous cliquez NON, l'impression sera lancée avec les réglages actuels !"
Question = MsgBox(Mess1 & vbLf & vbLf & Mess2, vbYesNoCancel, "DEMANDE DE STAGE - IMPRESSION")
If Question = vbYes Then
Application.Dialogs(xlDialogPrint).Show

End If
If Question = vbNo Then Sheets("FORMULAIRE_FORMATION").PrintOut Copies:=1, Collate:=True
If Question = vbCancel Then Exit Sub
end Sub

Mon problème est que si l'utilisateur choisi de régler l'impression, lorsqu'il imprime c'est la page en cour qui est imprimée !!

Moi je lance cette procédure à partir de la page sommaire.

Est t'il possible donc en lançant Application.Dialogs(xlDialogPrint).Show d'imprimer une page autre que la page en cour ?

Merci de votre aide

Bonne fin de journée
Willy
 
Z

Zon

Guest
Salut,

Oui tu peux sélectionner une autre page pour la 2 eme tu mets de 2 à 2 . Mais un paramètre nommé je ne crois pas à moins que tu actives tout simpliment ta feuille formulaires_formation avant de lancer la dialogs

A+++
 
W

Willy

Guest
Bonsoir Zon,

Merci de ton aide.
C'est ce que je craignais !!
je pense que je vais afficher temporairement la page à imprimer puis revenir sur le sommaire.

Merci encore
Willy
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…