Fw: [VBA ] ActiveSheet.Paste問題

[Ibrahimovic (伊布)]

※ [本文轉錄自 Visual_Basic 看板 #1QIUJPN0 ]

作者: Ibrahimovic (伊布) 看板: Visual_Basic
標題: [VBA ] ActiveSheet.Paste問題
時間: Mon Jan  1 15:35:51 2018

VBA新手想請教 ActiveSheet.Paste 問題



我錄了一個巨集

  內容是剪下 G5:K5，再貼到A5

  程式碼如下：


1    Range("G5:K5").Select
2    Selection.Cut
3    Range("A5").Select
4    ActiveSheet.Paste




第1行裡的儲存格列的位置改成迴圈，沒問題

可是接下來

第3行的儲存格A5

其中5(列)的位置套在迴圈就出現錯誤

偵錯出現是指第4行的 ActiveSheet.Paste


https://i.imgur.com/t1La05M.jpg


想請教這是語法上的問題還是邏輯上的錯誤？




--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 111.254.8.8
※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1514792153.A.5C0.html

※ 發信站: 批踢踢實業坊(ptt.cc)
※ 轉錄者: Ibrahimovic (111.254.8.8), 01/01/2018 15:37:16
→ soyoso: paste後selection.cut所剪下的部分就會取消，因此再次貼上
→ soyoso: 時會出現paste方法失敗的錯誤訊息
→ soyoso: 如原po是希望g5:k5、g7:k7、g9:k9...分別剪下貼入a5、a7、
→ soyoso: a9...的話，for j=....next j 的方面則不用寫
→ soyoso: 以range("a" & s).select，下接paste的部分

感謝解說
※ 編輯: Ibrahimovic (111.254.8.8), 01/02/2018 16:31:12