[VBA ] 多欄位複製至另一sheet
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
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 111.255.155.104
※ 文章網址: http://www.ptt.cc/bbs/Visual_Basic/M.1406471579.A.7D5.html
※ 編輯: poleman (111.255.155.104), 07/27/2014 22:42:34
推
07/27 23:17, , 1F
07/27 23:17, 1F
※ 編輯: poleman (111.255.155.104), 07/27/2014 23:41:19
推
07/28 01:14, , 2F
07/28 01:14, 2F
→
07/28 01:14, , 3F
07/28 01:14, 3F
→
07/28 01:16, , 4F
07/28 01:16, 4F
→
07/28 18:21, , 5F
07/28 18:21, 5F
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章