Private Sub Workbook_Open() Call MaMacro End Sub Sub MaMacro() MsgBox "Bonjour" End Sub
Private Sub Workbook_Open() message End Sub Sub message() 'MsgBox Oui + Non Select Case MsgBox("Voulez-vous déclencher la macro", vbYesNo, "Action") Case vbYes Call MaMacro Case vbNo 'procédure si click sur Non End Select End Sub Sub MaMacro() MsgBox "Bonjour" End Sub
Private Sub Application_Startup() Call MaMacro End Sub Sub MaMacro() MsgBox "Bonjour" End Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question