OLEOBJECT方法在Excel VBA中不工作答案

【问题标题】：Method of OLEObject not working in Excel VBAOLEOBJECT方法在Excel VBA中不工作
【发布时间】：2013-03-03 13:11:06
【问题描述】：

任何想法为什么这有效（VBA，Excel 2007）：

ThisWorkbook.Worksheets("Sheet1").OLEObjects(controlId).ListFillRange = ""

但这不是：

ThisWorkbook.Worksheets("Sheet1").OLEObjects(controlId).AddItem ("xyz")

我不记得我以前是如何解决这个问题的。现在它说对象不支持这个属性或方法（它是一个组合框）。

PS：这很奇怪；据我所知，我测试了一个运行良好的旧程序，但现在它莫名其妙地失败了。它还包含这样的引用：

MsgBox ThisWorkbook.Worksheets("Sheet1").toggleBtn.Caption

【问题讨论】：

【解决方案1】：

您需要引用对象本身才能使用 AddItem 属性。

ThisWorkbook.Worksheets("Sheet1").OLEObjects(controlId).Object.AddItem ("xyz")

【讨论】：