KenG


Here is a bit of code you could use.

Sub msg_box()
Dim ans As String

ans = MsgBox("Attention you are about to delete are you sure you wan
to?", vbYesNo)
If ans = vbYes Then
'your code
ElseIf ans = vbNo Then
Exit Sub
End If
End Sub

Charle

--
Message posted from http://www.ExcelForum.com