excel - VBA 组合框值编译问题

Question

我正在尝试将值添加到 VBA 中的组合框，但不断收到以下错误。知道我做错了什么吗？这是一个 ActiveX 控件。

Option Explicit

Private Sub Workbook_Open()
' Add items to combobox - based off selection in DND worksheet
With Sheet1.cmbComboBox
    .AddItem "Paris"
    .AddItem "New York"
    .AddItem "London"
End With

End Sub

Answer 1

有趣的是，由于某种原因，它没有将 Sheet1 识别为代号。下面的代码似乎工作。

Option Explicit

Private Sub Workbook_Open()
' Add items to combobox - based off selection in DND worksheet
With Worksheets(1).cmbComboBox
    .AddItem "Paris"
    .AddItem "New York"
    .AddItem "London"
End With

End Sub