MessageBox au lancement de feuille Excel

Résolu
damiens1026 Messages postés 563 Date d'inscription   Statut Membre Dernière intervention   -  
damiens1026 Messages postés 563 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je suis en train de réaliser une feuille Excel et je voudrais qu'à son lancement, une fenêtre (MessageBox avec OK ou Quitter) soit affichée, y a-t-il moyen de faire cela?


A voir également:

3 réponses

pilas31 Messages postés 1825 Date d'inscription   Statut Contributeur Dernière intervention   646
 
Bonjour,

Oui c'est possible, il faut mettre la macro suivante dans le dossier "ThisWorkbook" avec l'éditeur VBA (accessible par <Alt><F11>) :

Private Sub Workbook_Open()
Dim OuiNon As Integer
OuiNon = MsgBox("Voulez vous continuer ?", vbYesNo)
If OuiNon <> vbYes Then
    ActiveWorkbook.Close
End If
End Sub



A+
0
damiens1026 Messages postés 563 Date d'inscription   Statut Membre Dernière intervention   32
 
Merci ca fonctionne et y at-il un moyen pour empecher "VOulez-activez les macros de ce document" d'apparaitre a chaque fpis? Par exemple, configurer pour qu'elles soient acceptée automatiquement?
0
Zoul67 Messages postés 1959 Date d'inscription   Statut Membre Dernière intervention   149
 
Bonsoir,

Oui, mais tu seras plus vulnérable aux virus. cf. menu Outils>Options>Sécurité et bouton Sécurité des macros
0
damiens1026 Messages postés 563 Date d'inscription   Statut Membre Dernière intervention   32
 
ok merci :)
0