Listbox1.list =sheets(x)。範圍(張(x))。單元格(2,1),工作表(x)。單元格(r,5))
或者:
Listbox1.list =sheets(x)。range(" A2:E " & amp;r)。價值