1
我想將ComboBox
控件分配給ComboBox
類型的類成員。此控件位於工作表上的一個組中。如何投射形狀物體?
問題是通過GroupItems
屬性,我只能得到一個Shape
對象,而不是ComboBox
。所以在分配時,它會提示「類型不匹配」。
如果控件不在一個組中,我可以通過OLEObjects
屬性獲得一個OLEObject
對象,然後使用Object
屬性繞過類型不匹配。但是現在呢?
我想將ComboBox
控件分配給ComboBox
類型的類成員。此控件位於工作表上的一個組中。如何投射形狀物體?
問題是通過GroupItems
屬性,我只能得到一個Shape
對象,而不是ComboBox
。所以在分配時,它會提示「類型不匹配」。
如果控件不在一個組中,我可以通過OLEObjects
屬性獲得一個OLEObject
對象,然後使用Object
屬性繞過類型不匹配。但是現在呢?
一旦你有了你的Shape對象,無論它是否在Group中,你都可以通過DrawingObject.Object屬性訪問ComboBox。所以它看起來像
Set cboVariable = ActiveSheet.Shapes(1).GroupItems(2).DrawingObject.Object