大大好,
小弟想把sheet1的資料依序顯示在listbox1上
【sheet1資料為】
A1 A2
編號 1
產地 日本
規格 7S5G
尺寸 1.2
批號 3F094E
《格式一直重覆下去,但資料不一樣》
【小弟編寫的編碼為】
For i = 1 To 2000
If Sheet1.Cells(5 * i, 2).Value = "" Then
Exit Sub
Else
ListBox1.AddItem "規格:" & Sheet1.Cells(-2+5 * i, 2) & " 尺寸:" & Sheet1.Cells(-1 + 5 * i, 2) & " 批號:" & Sheet1.Cells(5 * i, 2)
End If
Next
但是發現如果sheet1資料不一樣長則顯示起來會有長有短,
請教各高手,請問該怎麼設定能夠,規格一排、尺寸一排、批號一排呢?
(假設資料最多都是10words。) |