vba 怎么定义和调用多个控件， 其中控件名已被更改

Question

使用excel编程，设置了多个combobox控件，但是命名已被修改为固定格式：CombBox_CH7_DRV_Mode_Select，其中数字7是变化的，从0-7. 

如何调用他们，并赋相同值。我尝试了下面方法但是无法使用。

for i =0 to 7
    sheet1.Controls("CombBox_CH"&i&"_DRV_Mode_Select").list= Array("jane","peter","kitty")
next i

Answer 1

1. Dim CombName As Object
   Dim i As Integer
   Dim name As String
   For i = 0 To 7
       name = "COMbBox_CH" & I & "_DRV_Mode_Select"
       Set CombName = Sheets("DRV").OLEObjects(name)
       CombName.Object.Clear
       CombName.Object.List = Array("jane", "peter", "kitty")
       CombName.Object.ListIndex = 0
   next i

   就是转换string 到 Object的表达方式