Setting a Collections object

[jender624]

I'm trying to set a collections object to a group of controls, for example:

Dim colControls = New Collection

Set colControls = Me.Controls

I'm having trouble doing this; I'm getting a type mismatch error. Does anybody have an idea why?

Thanks,

jender624

 

[jender624]

Oops, sorry I meant:

Dim colControls as New Collection

Set colControls = Me.Controls

 

[PHV]

Something like this ?
Dim colControls as New Collection, myCtrl As Object
For Each myCtrl In Me.Controls
colControls.Add Item:=myCtrl, Key:=myCtrl.Name
Next

Hope This Help, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244