我的主要目标是完全避免剪贴板在 VBA 中进行任何类型的复制和粘贴操作。
我可以通过以下方式复制值和公式来实现这一点。
Range("B1:B5").Value = Range("A1:A5").Value
-> 用于复制值Range("B1:B5").Formula = Range("A1:A5").Formula
-> 用于复制公式
现在困难的部分是复制单元格/范围格式(包括条件格式)与源范围相同。即使这样,我也能够在级别单元格(不是从范围级别),但这不是理想的情况,运行时太糟糕了。
例如:Cells(x,y).Font.Bold = Cells(u,v).Font.Bold
即使在将计算模式禁用为手动并将警报显示为 false 之后,运行时间也太糟糕了。
任何人都可以建议最好的方法来复制没有剪贴板和更好的运行时间的格式。