我想将ComboBox
控件分配给ComboBox
类的类成员。此控件位于工作表的组中。
问题是通过GroupItems
属性,我只能获得Shape
个对象,而不是ComboBox
。因此,在分配时,它会警告“类型不匹配”。
如果控件不在组中,我可以通过OLEObject
属性获取OLEObjects
对象,然后使用Object
属性来绕过类型不匹配。但是现在呢?
答案 0 :(得分:0)
获得Shape对象后,无论它是否在Group中,都可以通过DrawingObject.Object属性访问ComboBox。所以它看起来像
Set cboVariable = ActiveSheet.Shapes(1).GroupItems(2).DrawingObject.Object