VBAメモ: オブジェクトへの参照を代入する (Set)

Private m_obj As MyObject

Public Sub SetObj(obj As MyObject)
    Set m_obj = obj
End Sub