同时使用xlPasteValues和xlPasteFormats
同时使用xlPasteValues和xlPasteFormats
提问于 2017-05-24 17:26:09
我正在复制一个范围，然后将它的值和格式粘贴到另一个范围：
ws5.Range("F3:N" & xCell).SpecialCells(xlCellTypeVisible).Copy
ws16.Cells(Rows.Count, "B").End(xlUp).Offset(4, 0).PasteSpecial xlPasteValues
ws16.Cells(Rows.Count, "B").End(xlUp).Offset(4, 0).PasteSpecial xlPasteFormats是否可以不使用With在一个操作中完成这两个粘贴操作
我想增加我的宏的速度，这种小的减少可能会对我有帮助。
有没有像.PasteSpecial xlPasteValues and xlPasteFormats这样的东西
我找到了link，但即使是这个答案也在使用With，这对我来说毫无用处。
回答 4
Stack Overflow用户
发布于 2020-09-27 00:46:14
您可以这样使用它：
NewSheet.Range("A1").PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
NewSheet.Range("A1").PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False将两个命令一个接一个地放置。首先，您必须粘贴所有内容，然后再次粘贴，但只粘贴数值和数字格式。
Stack Overflow用户
发布于 2017-05-24 17:28:30
您正在寻找：
xlPasteValuesAndNumberFormatsedit##这不是正确答案。
Stack Overflow用户
发布于 2018-02-02 08:34:34
xlPasteAll
(实际上，因为xlPasteAll是默认的粘贴选项，所以您可以不使用它。)
来源：https://msdn.microsoft.com/en-us/library/aa195818(v=office.11).aspx
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/44154327
复制相关文章
相似问题
腾讯云开发者
