Message box

[obiwann]

I need to have a Message box that will do the following:
I have a range of cells ("a3:a10") that have been populated using a macro.
When the user clicks a button to populate those cells I nee a message box to appear 1st asking the question "There is Data already present, do you want to overwrite"
If he answers Yes then run the macro, if No then do nothing.

Any help would be appreciated.

 

[Fluff]

How about

If MsgBox("There is Data already present, do you want to overwrite", vbYesNo) = vbNo Then Exit Sub

 

[obiwann]

How would integrate the code looking to see if cells ("a3:a10") are empty or not?

 

[Fluff]

All cells or just one?

 

[obiwann]

Just a3

 

[Fluff]

Ok, how about

If Range("A3") <> "" Then
   If MsgBox("There is Data already present, do you want to overwrite", vbYesNo) = vbNo Then Exit Sub
End If