返回列表 上一主題 發帖

[發問] 迴圈問題

回復 1# 假面超人

For i = 2 To 4
Sheets("sheet3").Range("a2").Offset((i - 2) * 5).Resize(5, 1) = Sheets("sheet1").Cells(i, 1)
Next
學海無涯_不恥下問

TOP

        靜思自在 : 天上最美是星星,人生最美是溫情。
返回列表 上一主題