如何填充excel activex组合框

我试图用VBA来实现这一点，但我所做的一切都不起作用

 Me.ComboBox1.AddItem "Apple", 1

---

组合框中不会出现任何内容，当我单击向下箭头时，不会发生任何事情。它似乎只是停留在那里，不会移动，我在开发模式。谢谢很抱歉，我是excel新手

请尝试以下操作（添加到此工作簿模块）：

---

当您打开工作簿时，代码将自动更新组合框。

您能分享一点吗，比如您的组合框在哪里，您的组合框代码放在哪里？我的组合框在一张普通的纸上，周围没有任何内容，对于代码，我双击组合框，打开一个文件，我可以清楚地看到它属于我正在处理的工作表的左侧文件名（我使用的是excel 2010），这是我编写代码行的地方，您可以在上面看到，谢谢！

Private Sub Workbook_Open

   With ThisWorkbook.Sheets("Sheet1").ComboBox1
      .AddItem "Apple"
   End With

End Sub