Faire apparaître un message avant impression

Fermé
Orlane - 8 mars 2011 à 17:24
Mike-31 Messages postés 18188 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 13 mars 2023 - 9 mars 2011 à 10:09
Bonjour,



Je voudrais savoir s'il est possible en Word 2003 de faire apparaître un message à l'écran quand on lance l'impression.

L'objectif est de rappeler à l'utilisateur de faire quelque choses avant d'imprimer. Par exemple: "Avez-vous bien indiqué la date?" + bouton OK et l'impression commence.


D'avance merci !


Orlane

2 réponses

Raymond PENTIER Messages postés 57157 Date d'inscription lundi 13 août 2007 Statut Contributeur Dernière intervention 28 mars 2023 17 156
9 mars 2011 à 03:02
Peut-être : Il faudrait lancer l'impression grâce à une macro, sans utiliser les boutons des barres d'outils.
Et dans cette macro tu insères l'affichage de ton message.
0
Mike-31 Messages postés 18188 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 13 mars 2023 5 041
9 mars 2011 à 10:09
Salut,

Mon ami Raymond à tout à fait raison.

Word n'est pas ma tasse de thé mais il suffit de créer un bouton activeX sur la feuille word

faire Format/Police cocher Masqué pour le rendre invisible à l'impression

Ensuite Format/Contrôle/onglet Habillage et cocher Rapproché pour le positionner librement sur la page

Clic droit sur le bouton/Visualiser le code et coller ce code

Private Sub CommandButton1_Click()
If MsgBox(Prompt:="Si oui cliquez sur Oui pour imprimer(" & vbCrLf & vbCrLf _
& "Sur Non pour revenir au document", Buttons:=vbYesNo + vbQuestion, _
Title:="Avez-vous bien indiqué la date ?") = vbNo Then
Exit Sub
Else
ActiveDocument.PrintOut
End If
End Sub
-1