Patrick;

Replacing UserForms(1). by Me. produced:
........."Compile error: Invalid use of Me keyword"

Another suggestion? Thank you.



"Patrick Molloy" wrote:

probably zero basedinstead of
UserForms(1).
try
me.




"monir" wrote:

Hi;

The user form, frmOptSelect, has a number of frames, each with a number of
option controls. The algoritms for all combinations of options are not
currently available, so I'm disabling certain options for now.
I'm trying to make sure that an option is selected in each frame on the form
before I click the btnOpen button. In:

Private Sub btnOpen_Click () event procedure and right at the top, I
inserted:
....... CheckOptions
which is a regular macro:

Sub CheckOptions()
Dim myOption As Control
Dim myFlag As Integer
.................................................. ...
' check options in frame grpSeries
For Each myOption In UserForms(1).grpSeries.Controls
.....If myOption.Value = True Then myFlag = 1
Next myOption
If myFlage < 1 Then MsgBox "Select B- or GEL-Series"
.................................................. ....
' repeat for all frames
.................................................. ....

I got " Run-time error '9': Subscript out of range", and the above For Each
statement is higlighted!

Any suggestions ? Thank you