Confirmation avant d'imprimer un document [Résolu]

Signaler
Messages postés
4
Date d'inscription
jeudi 10 novembre 2005
Statut
Membre
Dernière intervention
20 avril 2006
-
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
-
Bonjour j'ai un code vba pour avoir une boite de message avant l'impression du document qui est activez par une macro.
Mais que je clique sur oui ou non l'impression est envoyer même si je ferme la fenêtre par la croix voici le code.

Sub Imprimer()
Dim i
i = MsgBox("voulez imprimez cette page ? ", vbOKCancel)
'Ok renvois i=1, Cancel renvois i = 2, fermeture à la croix renvois i = 2
ActiveWindow.SelectedSheets.PrintOut copies:=1, Collate:=False
End Sub

Si vous avez une idée merci..

1 réponse

Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
62
Il te suffit de tester le résultat de la fonction MsgBox

Sub Imprimer()
if MsgBox("voulez imprimez cette page ? ", vbOKCancel) = VbOk Then
ActiveWindow.SelectedSheets.PrintOut copies:=1, Collate:=False
End If
End Sub
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 152 internautes nous ont dit merci ce mois-ci