これが機能する理由(VBA、Excel 2007):
ThisWorkbook.Worksheets("Sheet1").OLEObjects(controlId).ListFillRange = ""
しかし、これはしません:
ThisWorkbook.Worksheets("Sheet1").OLEObjects(controlId).AddItem ("xyz")
以前にこれをどのように解決したか覚えていません。現在、オブジェクトはこのプロパティまたはメソッドをサポートしていないと表示されています(コンボボックスです)。
PS:これは非常に奇妙です。私は覚えている限りうまく機能した古い手順をテストしましたが、今では不可解に失敗します。また、次のような参照も含まれています。
MsgBox ThisWorkbook.Worksheets("Sheet1").toggleBtn.Caption