Excel-VBA：ワークシートに配置されたコントロールの奇妙な動作。バグですか？

Question

この質問 How to access textBox placed on sheet in VBA module?

に答えながら、私はワークシート上TextBoxDeveloper --> Insert --> ActiveX Controlsからタブを追加し、Worksheet型変数を使用してVBAにそのコントロールにアクセスしようとするのであれば、VBAは、そのコントロールを発見するために失敗したこの出くわしました。しかし、私がワークシートのCodeNameを使用するとうまくいきます。また、バリアント型を使用してワークシートを割り当てても、コードは正常に動作します。

私が何か間違っているのか、それともバグかだけを理解しようとしています。

---

あなたはワークシート型の変数を使用する場合、ExcelがVBAにそのシート上のコントロールを発見するために失敗しました。したがって、シート変数をObject/Variantとして宣言すると、コードは正常に動作します。

他の代替は、あなたがすべてのオブジェクトをVBA IDEのプロパティグリッドでwksDBSheetとしてワークシートの名前を設定して、あなたのコードで、それがテキストボックス

​​

Answer 1

を発見することに使うので、もし直接、ワークシートのCodeNameを使用することですDeveloper -> Insert -> Form ControlsはOleObjectsコレクションに所属しています。

チェックこのサンプルコード：

Option Explicit 

Sub Whatever() 

EnumAllSettledObjectsInSheet ThisWorkbook.Worksheets(1) 

End Sub 

Sub EnumAllSettledObjectsInSheet(wsh As Worksheet) 
Dim obj As OLEObject 
For Each obj In wsh.OLEObjects 
    Debug.Print obj.Name 
Next 

End Sub 

エラーが会う場合、私に知らせてください。

より：OLEObjects Object (Excel)