Message box d'avertissement

Bonjour au forum,

Voilà, j'ai un bouton qui permet, par un code VBA, de clôturer un mois donné.

J'aurai voulu que, par sécurité, quand on clique sur ce bouton il apparaît un boite de message me demandant : "Clôturer le mois ?" "Oui" "Non"

Oui il clôture, non il clôture pas

Comment établir mon code

Merci de vos prochaines réponses

Bien cordialement

Le code de clôture dans un module est :

Sub Cloture_du_mois()
'
' Cloture_du_mois Macro
'

'
    Range("V6:X28").Select
    selection.ClearContents
    Sheets("MONEY MANAGEMENT").Select
    Range("B56:D78").Select
    selection.Copy
    Sheets("1 - Récap G-P 2013").Select
    selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Sheets("MONEY MANAGEMENT").Select
    Range("A56:B78").Select
    Application.CutCopyMode = False
    selection.ClearContents
    Range("B56").Select
End Sub

Bonjour

En début de ton code, tu ajoutes

Reponse = MsgBox("Clôturer le mois ?", vbYesNo, "Demande de confirmation")
' La réponse Non active la ligne suivante et arrête la Macro
If Reponse = 7 Then Exit Sub
'Suite du Code

Cordialement

Bonjour

Bonjour Amadéus

Rajoutes la ligne surlignée

Sub Cloture_du_mois()
'
' Cloture_du_mois Macro
'

 If MsgBox("Voulez-vous clôturer ce compte", vbQuestion + vbYesNo, "Clôture du compte") <> vbYes Then Exit Sub
   Range("V6:X28").Select
' .
' .

Bonjour Amadéus

Bonjour Banzai64

Merci beaucoup pour vos réponses, qui d'ailleurs, amènent au même résultat.

En lisant ces codes, ça parait si simple, je commence à comprendre le fonctionnement du VBA,, du moins la logique ! Mais il reste encore beaucoup à apprendre.

Merci encore à vous.

J'aurais encore quelque chose à vous demander sur le code de clôture mais c'est un peu compliqué, il faut que je fasse un fichier exemple à vous joindre.

Donc à bientôt

Bien cordialement