试图从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


有任何想法吗?谢谢

最佳答案

如果它实际上是MSForms.Listbox(即ActiveX),则:

Set lb = chartSheet.lbPartNo


否则,将其声明为Listbox并使用:

 Set lb = chartSheet.ListBoxes("lbPartNo")

关于excel - 如何在Excel VBA中声明和设置ListBox变量?,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/33348774/

10-10 05:43