VBA：將值複製並粘貼到其他工作表的下一個空行中

我試圖從「Sheet1」複製一個範圍並粘貼值到「Sheet2」中的下一個空行，而不是代碼。我發現這個代碼，但它只是copys和粘貼代碼：VBA：將值複製並粘貼到其他工作表的下一個空行中

Sheets("Sheet1").Range("G32:I54").Copy Sheets("Sheet2").Range("A60000").End(xlUp).Offset(2, 0) 'Select Case Sheets("Sheet1").Range("A1") = ""

誰能幫助粘貼值，而不是代碼？

來源

2014-09-10 user3049442

的可能重複[如何只值在Excel VBA中從一系列複製？]（http://stackoverflow.com/questions/24294923/how-to-copy-only-values-in-excel- vba-from-a-range） – 2014-09-10 09:40:14

不，不是因爲它沒有拼接放置在第一個空單元格 – user3049442 2014-09-10 10:16:18

這絕對是重複的。其他問題的答案適用於您的案例;只需將你的範圍（'End（xlUp）'和所有爵士）替換爲另一個問題的'dest'。 – 2014-09-10 10:23:14

Sheets("Sheet1").Range("G32:I54").Copy 
Sheets("Sheet2").Range("A60000").End(xlUp).Offset(2, 0).pastespecial paste:=xlPasteFormats 
Sheets("Sheet2").Range("A60000").End(xlUp).Offset(2, 0).pastespecial paste:=xlPasteValues 
application.cutcopymode=false

來源

2014-09-10 09:35:45 cyboashu

如果我使用這個，我只是得到錯誤'這個操作需要合併的單元格大小相同'。第二條線的哪一部分正在考慮細胞的大小？ – user3049442 2014-09-10 09:49:34

我相信你需要首先應用格式。現在試試。 – cyboashu 2014-09-10 10:06:53

仍然發生同樣的錯誤。它粘貼格式，但在第3行給出錯誤 – user3049442 2014-09-10 10:29:08

VBA：將值複製並粘貼到其他工作表的下一個空行中

回答

相關問題