如何在Excel VBA中声明和设置ListBoxvariables？

在Excel中从模块（而不是工作表或表单）中寻找任何有关如何在工作表中引用列表框的信息（使用MS Forms引用）。

Dim lb As MSForms.ListBox Dim chartSheet as worksheet Set chartSheet = Sheets("Chart") Set lb = chartSheet.Objects("lbPartNo") ' nope Set lb = chartSheet.ListObjects("lbPartNo") ' nope Set lb = chartSheet.ListBoxes("lbPartNo") ' nope 

有任何想法吗？ 谢谢

Answer 1

如果它实际上是一个MSForms.Listbox（即ActiveX），那么：

 Set lb = chartSheet.lbPartNo 

否则，将其声明为Listbox并使用：

  Set lb = chartSheet.ListBoxes("lbPartNo")