Try something like this.......on UserForm code sheet
For Each C In Array("cboAreaP", "cboAreaV", "cboAreaD", "cboSingle",
"cboDouble", "cboSingle", "cboDouble","cboDebossed")
With Me.Controls(C)
.AddItem "25%"
.AddItem "50%"
.AddItem "75%"
.AddItem "100%"
End With
Next
--
Regards,
Nigel
(E-Mail Removed)
"RyanH" <(E-Mail Removed)> wrote in message
news:92242623-4132-4380-B7F9-(E-Mail Removed)...
> Can you have an Array of Controls that are located in different Frames on
> a
> UserForm? Here is the code that I have and I am getting an Run Time
> Error:
> Type Mismatch.
>
> For Each Control In Controls(Array("cboAreaP", "cboAreaV", "cboAreaD", _
> "cboSingle", "cboDouble",
> "cboDebossed"))
> With Control
> .AddItem "25%"
> .AddItem "50%"
> .AddItem "75%"
> .AddItem "100%"
> End With
> Next Control