时间戳

首页 > 解决方案 > PasteSpecial 和 xlPasteValues

excel - PasteSpecial 和 xlPasteValues

问题描述

我真的不知道如何将粘贴模式设置为 xlPasteValues 我在哪里附加这个？

Set ActiveListWB = Workbooks.Open(FileName)
ActiveListWB.Sheets("Resources").Range("D2:CI206").Copy WSNew1.Range("D2") _

WSNew1.Name = Split(ActiveListWB.Name, "_")(0) & " - Resources"

标签： excelvba

解决方案

如果要指定粘贴方法，则不能一行完成：

ActiveListWB.Sheets("Resources").Range("D2:CI206").Copy WSNew1.Range("D2")

应该：

ActiveListWB.Sheets("Resources").Range("D2:CI206").Copy
WSNew1.Range("D2").PasteSpecial xlPasteValues

不知道为什么最后有一个下划线，这会使代码期望在下一行继续该行。

推荐阅读