[VBA ] 多欄位複製至另一sheet

作者: poleman (本來就沒有)   2014-07-27 22:32:57
VBA新手還請各位指教~
有兩個sheet想要複製sheet A的欄位資料至sheet B
已在B的欄位資料間,各新增一個空白欄,以便將sheet A的欄位逐欄複製過去
sheet A的欄位則是依照順序排列
使的sheet B的欄位變成
1 (空欄) 3 (空欄) 5 (空欄) 7 (空欄) 9
想請問各版友,有什麼方法可以複製過去,所以想請版友協助~
不太會寫迴圈,這好像使用迴圈較方便~
感謝~~
*****************************分隔線*******************************
剛剛寫以下這個迴圈,但一直說我next錯誤,不知道錯在哪裡,
再麻煩版友協助~T.T
Sub test()
Dim i, j As Integer
For i = 8 To 10 Step 1
For j = 8 To 12 Step 2
i = i + 1: j = j + 2
Sheets(1).Select
Columns(i).Select
Columns(i).Copy
Sheets(2).Select
Columns(j).Select
Columns(j).Paste
Next
End Sub
作者: johnpage (johnpage)   2014-07-27 23:17:00
錄巨集,看程式
作者: tsongs (......)   2014-07-28 01:14:00
1個For對1個Next 你有2個For確只有個Nextnext j 換行 next i還有有Step 不用i+1 j+2 會跳2次
作者: poleman (本來就沒有)   2014-07-28 18:21:00
謝謝樓上,找到人問到答案了~

Links booklink

Contact Us: admin [ a t ] ucptt.com