Excel Listbox不会在ListFillRange更改后更新

所以我试图创build一个dynamic的列表框，除了列表框没有更新，一切正常。 如果您查看属性ListFillRange已更改，但实际的框保持相同的范围。

我的代码如下：

Private Sub ListBox1_Click() Dim Rng As String Rng = "'Identificatie_&_WGK'!R2:R" & (Worksheets("Identificatie_&_WGK").Range("S2").Value + 1) Worksheets("Etiketten").ListBox1.ListFillRange = Rng End Sub 

S2是需要显示的名称的数量。