如何dynamic改变Listbox的范围？

在sheet2上，我有这个

Private Sub Worksheet_Activate() Sheet2.Listbox1.ListFillRange = Sheet1.Range("A2:A10").Address(, , , True) End Sub 

当Sheet1上的范围发生变化时，例如A11，我想更改为Range（“A2：A11”）因为我知道rowx的位置，所以试过

 Sheet2.Listbox1.ListFillRange = Sheet1.Range(cells(2, 1), cells(rowx, `1)).Address(, , , True) 

但是我没有成功。 为什么？

Answer 1

您没有使用Sheet1引用限定单元格。

试试这个，看看是否适合你…

 Sheet2.Listbox1.ListFillRange = Sheet1.Range(Sheet1.Cells(2, 1), Sheet1.Cells(rowx, 1)).Address(, , , True)