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

patrickb12 4 Messages postés jeudi 10 novembre 2005Date d'inscription 20 avril 2006 Dernière intervention - 7 déc. 2005 à 20:22 - Dernière réponse : Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscription 18 janvier 2017 Dernière intervention
- 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
Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscription 18 janvier 2017 Dernière intervention - 8 déc. 2005 à 09:50
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

Merci Renfield 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 75 internautes 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.