Visual Basic Excel - Boîte de dialogue
Fermé
delphine
-
6 mars 2007 à 17:17
didier09 Messages postés 13 Date d'inscription mercredi 28 février 2007 Statut Membre Dernière intervention 20 décembre 2007 - 7 mars 2007 à 21:47
didier09 Messages postés 13 Date d'inscription mercredi 28 février 2007 Statut Membre Dernière intervention 20 décembre 2007 - 7 mars 2007 à 21:47
A voir également:
- Visual Basic Excel - Boîte de dialogue
- Se connecter à ma boite hotmail - Guide
- Liste déroulante excel - Guide
- Visual basic download - Télécharger - Langages
- Microsoft 365 basic - Guide
- Microsoft visual c++ runtime - Guide
1 réponse
didier09
Messages postés
13
Date d'inscription
mercredi 28 février 2007
Statut
Membre
Dernière intervention
20 décembre 2007
36
7 mars 2007 à 21:47
7 mars 2007 à 21:47
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
