Visual Basic Excel - Boîte de dialogue
delphine
-
didier09 Messages postés 13 Statut Membre -
didier09 Messages postés 13 Statut Membre -
Bonjour,
Je souhaite créer une boîte de dialogue sur Excel qui demande lorque je clique sur "Imprimer" :
"La mise à jour a-t-elle été effectuée ?"
Si oui, alors imprimer
Si non, alors ne pas imprimer.
Merci pour votre aide
Je souhaite créer une boîte de dialogue sur Excel qui demande lorque je clique sur "Imprimer" :
"La mise à jour a-t-elle été effectuée ?"
Si oui, alors imprimer
Si non, alors ne pas imprimer.
Merci pour votre aide
Configuration: Windows XP Internet Explorer 6.0
A voir également:
- Visual Basic Excel - Boîte de dialogue
- Visual basic - Télécharger - Langages
- Boite gmail pleine - Guide
- Boite gmail bloquée - Guide
- Se connecter à ma boite hotmail - Guide
- Liste déroulante excel - Guide
1 réponse
Bonjour,
Dans la fenêtre de Visual Editor et dans l'explorateur de projet,clique sur ThisWorkbook pour en visualiser le code.
Dans la feuille du code sélectionne l'objet Workbook puis l'événement associé BeforePrint.
il apparaît alors:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
End Sub
Dans la procédure rendre le code suivant:
Dim Message As Integer
Message = MsgBox("La mise à jour a-t-elle été effectuée ?", vbYesNo + vbQuestion, "Impression de la mise à jour")
If Message = vbNo Then
Cancel = True
End If
J'espère que cela répond à ta question
Dans la fenêtre de Visual Editor et dans l'explorateur de projet,clique sur ThisWorkbook pour en visualiser le code.
Dans la feuille du code sélectionne l'objet Workbook puis l'événement associé BeforePrint.
il apparaît alors:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
End Sub
Dans la procédure rendre le code suivant:
Dim Message As Integer
Message = MsgBox("La mise à jour a-t-elle été effectuée ?", vbYesNo + vbQuestion, "Impression de la mise à jour")
If Message = vbNo Then
Cancel = True
End If
J'espère que cela répond à ta question
