send keys

K

ksnapp

hi,

is there a way send keys can check a check box?

I can select the line next to it but i can't figure a way to get th
effect of clicking on it

regards
kevi
 
V

Vasant Nanavati

Using SendKeys is generally a very bad idea, unless no other alternative is
available. Usually there are far better ways of accomplishing your
objectives.
 
G

Greg Wilson

Assuming a worksheet based check box from the Forms tool
bar and you want to run a macro only when it's checked:

Sub ToggleCheckBox()
With Sheets("Sheet1").Shapes("Check Box 1").ControlFormat
If .Value = 1 Then
.Value = -4146
Else
.Value = 1
Call CheckBoxIsChecked
End If
End With
End Sub

Sub CheckBoxIsChecked()
MsgBox "Hello"
End Sub

Works for me.

Regards,
Greg
 
Top