Msg confirmation quand clic sur bouton-macro

[yoyo]

Re bonjour,
Comment faire apparaître un message de confirmation lors du clic sur un bouton-macro?
Merci d'avance.

 

[ninou58]

Bonjour,

rep = MsgBox('Etes vous sur', vbYesNo)

ensuite tu peux tester
if vbyes then

End if

 

[Blunet]

Salut yoyo voici 1 exemple :

Sub CommandButton1_QuandClic()
Rep = MsgBox('Vous êtes sur le point de créer une nvlle entreprise ! Voulez vous poursuivre ?', vbInformation + vbOKCancel, _
' Actualisation des exercices comptables ')
If Rep = vbCancel Then
MsgBox ' Vous avez décidé d'annuler la création de la nouvelle entreprise', vbInformation, 'Paramétrage'
Else
MsgBox ' Vous avez choisi de créér une nouvelle Entreprise', vbInformation, 'Paramétrage'
End If

End Sub

 

[Blunet]

le fichier joint. [file name=Classeur11_20060404112611.zip size=12624]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur11_20060404112611.zip[/file]