本帖最後由 ui123 於 2017-9-21 11:35 編輯
請教~目前遇到一個問題,再將EXCEL 範圍放入array 後想再取出放回某個範圍,但是無法貼上,有人遇過一樣的問題嗎?
javascript:;
Sub past()
Dim arrj(1, 3, 30)
For i = 1 To 30
arrj(1, 1, i) = Sheets(1).Range("A" & i + 1 & ":F" & 250 + i)
Next
Sheets(1).Rang("J2:O251") = arrj(1, 1, 1)
Sheets(1).Rang("Q2:V251") = arrj(1, 1, 2)
End Sub |