waarschuwing bij gebruik wissen knop

[lobelvin]

hallo,

ik heb een werkblad waar ik door middel van een macro bepaalde cellen laat leegmaken, deze macro wordt bediend door een knop op mijn werkblad, tot hier geen probleem, maar ik zou graag hebben als deze knop gebruikt wordt dat er eerst nog een waarschuwing verschijnt waar vb. opstaat : "bent U zeker deze gegevens te wissen" met de keuze tussen "ja" of "nee".
kan iemand mij de VBA code vertellen aub?

alvast bedankt,
danny

 

[ExcelAmateur]

Zet er een MsgBox in met de vraag.
MsgBox "De gegevens worden gewist, weet u het zeker?"

 

[Ginger]

If msgbox("wil je wissen?",vbyesno,"pas op!") = vbno toen exit sub

 

[lobelvin]

Vraag = MsgBox("Wil je de cellen wissen?", vbQuestion + vbYesNo, "Cellen wissen")
If Vraag = vbYes Then
'Je code
end if

deze code werkt ook perfect !!

iedereen bedankt,
danny