オブジェクトが既に参照されているかどうかはどのように知りますか？

Question

Excel 2003スプレッドシートに添付されているVBAによっては、インスタンス化するのに時間がかかるオブジェクトを使用する必要があるため、一度「設定」したいのは一度だけです...

説明を書くよりもコード！

' Declare the expensive object as global to this sheet 
Dim myObj As SomeBigExpensiveObject 

Private Sub CommandButtonDoIt_Click() 

    ' Make sure we've got a ref to the object 
    If IsEmpty(myObj) Then ' this doesn't work! 
     Set myObj = New SomeBigExpensiveObject 
    End If 

    ' ... etc 

End Sub 

myObjがすでに設定されているかどうかを確認するにはどうすればよいですか？

私はIsNull（myObj）とIsEmpty（myObj）を試しました。myObjの状態にかかわらず、両方とも 'set'をスキップしました。私は

if myObj = Nil then 

または

if myObj = Empty then 

または

if myObj = Nothing then 

任意のアイデアを行うことはできませんか？

SAL

Answer 1

これは動作するはずです：

If myObj IS Nothing Then 

問題が解決しない場合はCOMのinitの呼び出しは同期しているので、そのクラスによって、具体的に実装非同期使う初期がなければならない（「IS」に注意してください）デフォルトではだから、あなたが待っているいくつかのプロパティやシンクメソッドのために、ドキュメントについてBigクラスを調べたり、開発者と話したりする必要があります。