我正在尝试将范围从一张纸复制到另一张纸。在源工作表上,我具有格式化和合并的单元格。我想要目标表上的完全匹配。源工作表称为Budget Hours
,目标工作表称为Schedule
。
我尝试了
Range("B5", Range("E1000")).Copy
Worksheets("Schedule").Cells(6, 2).PasteSpecial Paste:=xlPasteFormats
Worksheets("Schedule").Cells(6, 2).PasteSpecial Paste:=xlPasteValues
它执行PasteFormats
,但给PasteValues
提供了错误。错误为“运行时错误'1004'”:您无法在此处粘贴此内容,因为“复制”区域和粘贴区域的大小不同。在粘贴区域或相同大小的区域中仅选择一个单元格,然后尝试再次粘贴。“
然后我尝试了Sheets("Schedule").Range("B6:E500").Value = Sheets("Budget Hours").Range("B5:E499").Value
。此方法有效,但不保留任何格式,并且撤消合并的单元格。
合并和格式化的单元格示例为B5:D5
,背景为蓝色。我已经附上了来源的图片。
如何在目标工作表(Schedule
)上获得完全匹配的内容?