command button coding for clearing content of specific cells

[Martin Lloyd]

I would like to set up a command button in VBA that, when activated, clears the contents of specified cells in a worksheet (with a caution 'are you sure?')
Could you let me know the coding for this, please?
Thanks

 

[Hui]

Sub Clear_Me()
  Dim ans As Integer
  ans = MsgBox("Are you sure", vbOKCancel, "Clear my area")
  If ans = 1 Then Range("B3:E10,F11:I18,J19:K22").ClearContents 'Change range to suit yourself
End Sub

 

[Martin Lloyd]

A very late thank you for helping me on this question a few weeks ago.