You must use the keyword Set with objects
Code:
Dim colCars As Collection
' [code to fill collection goes here]
.
.
.
' [clsMine instantiation goes here]
Set clsMine.setCars = colCars ' pass collection
clsMine looks like this:
Code:
Private mCol As Collection
.
.
Public Property Let setCars(ByVal Value As Collection) ' or
Public Property Let setCars(ByVal Value As Object)
Set mCol = Value
End Property
Use As Collection if it is certain that you will be using a Collection. That way (with early binding) the compiler will check that the methods and properties you use of the Collection object actually apply to it.