Find centralized, trusted content and collaborate around the technologies you use most.
Teams
Q&A for work
Connect and share knowledge within a single location that is structured and easy to search.
我正在使用 VBA 代码将值从一个工作簿复制并粘贴到另一个工作簿。但是,当我粘贴时,目标工作表中的边框将被删除。粘贴时如何保持边框?
下面是我的代码:
With wsSource .Range(.Range("A2"), .Range("C2").End(xlDown)).Copy wsDestination.Range("A3") End With
我读过该PasteSpecial方法可能有用,但我不知道如何在上面的代码中实现它。
PasteSpecial
谢谢!
试试这个
With wsSource .Range(.Range("A2"), .Range("C2").End(xlDown)).Copy wsDestination.Range("A3").PasteSpecial Paste:=xlPasteValues, _ Operation:=xlNone, SkipBlanks:=False, Transpose:=False End With
如有疑问,请录制宏;)