複製不同工作表中的行

如何複製工作表中的多行並將其粘貼更深，包括任何格式，如背景顏色和行中的所有值？複製不同工作表中的行

我試圖用這個片段

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

但是當我嘗試執行此，我得到一個應用程序錯誤。我嘗試了一些其他的例子，但他們似乎沒有做我想要的一樣...

任何幫助嗎？

來源

2011-09-13 Florian Peschka

這可能不會幫助你，但是你的代碼在我的機器上按預期工作。（Excel 2003） – Jacob

嗯，這很有趣...我使用Excel 2007 ...將添加Office-2007標籤，所以沒有混淆。感謝您的評論 –

您是否嘗試過'Selection.Paste'和'Selection.PasteSpecial'？ – Ahmad

我簡化了你的代碼（記錄器的代碼總是充滿了不必要的「選擇」），並且它工作正常，即使在表單中也是如此！

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

來源

2011-09-13 12:07:12

就像一個魅力:) –

複製不同工作表中的行

回答

相關問題