変数がオブジェクトを参照しているか否かを判定するには、どうすれば良いですか？

Public Sub SetObj(ByRef o As MyObj)

　　　'ここでoがオブジェクトを参照していれば
　　　Set Obj = o
　　　'みたいなことをやりたいです

End Sub