Adam,
Property Get getPrivate() as PrivateInfo
getPrivate = myPrivate
End Property
should be
Property Get getPrivate() as PrivateInfo
SET getPrivate = myPrivate
End Property
--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
"Adam" wrote in message
ups.com...
I have the following set up:
'Class Person
Private myPrivate as PrivateInfo
....
Private Sub Class_Initialize()
Set myPrivate = new PrivateInfo
...
End Sub
...
Property Get getPrivate() as PrivateInfo
getPrivate = myPrivate
End Property
...
'End Class Person
where PrivateInfo is a different class module.
Then I have a userform that has a sub called setInfo that takes
a
PrivateInfo as a parameter. Is there a way that I can call
something
similar to this:
Private joe as Person
PrivateInfoUserform.setInfo joe.getPrivate()
I have code similar to that above but it gives me an "Object
variable
or With block variable not set (Error 91)" error. What am I
doing
wrong?