Hello Leeroy,
Check boxes are InlineShapes
Try this for a start:
Code:
Dim inls As InlineShape
For Each inls In ActiveDocument.InlineShapes
If inls.OLEFormat.ClassType = "Forms.CheckBox.1" and _
inls.OLEFormat.Object.Value = True Then
'Do something
End If
Next
I'm a little new myself so I am sure someone can offer a cleaner version
Brock