Visual Basic for Applications Reference
This example uses the Property Set statement to define a property procedure that sets a reference to an object.
' The Pen property may be set to different Pen implementations. Property Set Pen(P As Object) Set CurrentPen = P ' Assign Pen to object. End Property