[英]VBA: Copy and paste values in next empty row in other sheet
我正在尝试将“ Sheet1”和粘贴值(而不是代码)的范围复制到“ Sheet2”中的下一个空行。 我找到了以下代码,但它仅复制并粘贴了代码:
Sheets("Sheet1").Range("G32:I54").Copy Sheets("Sheet2").Range("A60000").End(xlUp).Offset(2, 0) 'Select Case Sheets("Sheet1").Range("A1") = ""
任何人都可以帮助粘贴值而不是代码吗?
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
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.