Ok, I got rid of error 9 (subscript out of range) - wrong sheet name
however this error has been surplanted by 'Run-time error 438' - Objec
doesn't support this property or method.

Here is my code:

Dim i As Long
For i = 16 To 31
Worksheets("INSRD VEH PASS").OLEObjects("OptionButton" & i).BackColor
&HFFFF&
Next i

It appears to not like the OLEObjects method, but I cannot figure out
way around this. Any suggestions..

--
Message posted from http://www.ExcelForum.com