HELP...Beginner

cksm4 · #2 02-21-2011, 10:23 PM

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

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Just a beginner...be nice please!	Tommy Gun	Project	1	02-18-2009 03:06 AM