MessageBox au lancement de feuille Excel

Résolu
damiens1026 Messages postés 695 Statut Membre -  
damiens1026 Messages postés 695 Statut Membre -
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?



--
Meilleures salutations
damiens1026

3 réponses

  1.
    pilas31 Messages postés 1878 Statut Contributeur 648
     
    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
  2. damiens1026 Messages postés 695 Statut Membre 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
  3. Zoul67 Messages postés 2001 Statut Membre 149
     
    Bonsoir,

    Oui, mais tu seras plus vulnérable aux virus. cf. menu Outils>Options>Sécurité et bouton Sécurité des macros
    0
    1. damiens1026 Messages postés 695 Statut Membre 32
       
      ok merci :)
      0