Msgbox

Résolu
benzi Messages postés 84 Statut Membre -  
benzi Messages postés 84 Statut Membre -
Bonjour à tout le monde,

J'ai crée un bouton Effacer pour effacer des données dans des cellules mais avant je voudrai ajouter une msgbox d'avertissement avec 2 boutons oui/non. Si on clic sur oui tout s'efface, si sur non rien ne s'efface. Le souci c'est que je clic sur oui ou sur non tout s'efface quand même. Comment faire?
Merci de vos réponses.
Dan

2 réponses

Réponse 1 / 2
gbinforme Messages postés 15481 Date d'inscription   Statut Contributeur Dernière intervention   4 728
 
bonjour

Comme ceci cela devrait effectuer ta fonction 
Public Sub Effacer() 
Dim reponse 
reponse = MsgBox("Voulez-vous effacer ?", vbYesNo) 
If reponse = vbYes Then [plage].ClearContents 
End Sub


Toujours zen
0
Réponse 2 / 2
benzi Messages postés 84 Statut Membre 1
 
Bonsoir,

Merci pour ta réponse, c'est Ok.

Dan
0

Discussions similaires

[VB]MsgBox avec variable
Reese -
Anonymatum -

5 réponses
[macro openoffice] programmation d'un msgbox
Didier61 -
Didier61 -

6 réponses
Msgbox dans un .bat
angel77167 -
angel77167 -

4 réponses
afficher le contenu d'une variable sur un msgbox
didihak -
LaurentMtns -

1 réponse
afficher MessageBox avec java
lion0071 -
lion0071 -

2 réponses