復制來自不同工作表的行

Question

如何復制工作表中的多行並將其進一步粘貼，包括諸如背景色之類的任何格式以及行中已有的所有值？

我嘗試使用此代碼段

Application.Worksheets("IPL").Select
Rows("6:9").Select
Application.CutCopyMode = False
Selection.Copy
Application.Worksheets("CMM").Select
Rows("13:13").Select
Selection.Insert Shift:=xlDown

但是，當我嘗試執行此操作時，出現應用程序錯誤。 我嘗試了其他一些示例，但是它們似乎並沒有按照我想要的做...

有幫助嗎？

Answer 1

我簡化了您的代碼（記錄器的代碼總是充滿不必要的“選擇”），即使跨頁工作也可以正常工作！

Sheet1.Rows("5:6").Cut
Sheet2.Rows("18:19").Insert Shift:=xlDown