How to Copy Objects?

Hola Jorge, proba con esto, es un ejemplo con checkbox

Check1.Caption = "ggg"
Dim a As CheckBox
Set a = Check1
Print a.Caption

Un saludo, Víctor Koch.


"Jorge López" escribió en el mensaje
news:4de601c34188$17878160$
I couldn´t find any way to copy an object to another, I
mean, to assign all the properties from an object to
another whitout having to do it for each property.
Specifically I'm triying to copy objects of the StdFont
Class, I need two objects with the same properties. I tried
to use Set, but this creates a reference, and I nedd a copy