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

Messages postés
4
Date d'inscription
jeudi 10 novembre 2005
Dernière intervention
20 avril 2006
- - Dernière réponse : Renfield
Messages postés
17308
Date d'inscription
mercredi 2 janvier 2002
Dernière intervention
22 août 2018
- 8 déc. 2005 à 09:50
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..
Afficher la suite 

1 réponse

Meilleure réponse
Messages postés
17308
Date d'inscription
mercredi 2 janvier 2002
Dernière intervention
22 août 2018
60
3
Merci
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

Dire « Merci » 3

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

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

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.