Making a Macro recognize Checkboxes

[ERed1]

Hey all,

Is there a way to make a macro recognize that a check mark has been checked? and if so what is it?

I am trying to have a few check boxes select different ranges and a button copy those ranges and then paste them elsewhere.
Thank you in advance.

 

[mikerickson]

If the checkbox is from the Forms menu (not ActiveX) then

If Sheets("Sheet1").Shapes("Check Box 1").ControlFormat.Value = xlOn Then
     MsgBox "checked"
Else
    MsgBox "not"
End IF