[已解决]修改VBA复制后粘贴为数值

果冻的心 · 发表于 2022-8-16 09:27

本帖最后由果冻的心于 2022-8-16 09:48 编辑

我想复制A工作簿表三甲的东西到B工作簿中，复制过去后想和B工作簿设置的格式保持一致（就是复制后粘贴为数值），请大佬帮忙修改下，谢谢代码             AWb.Sheets("表三甲").Range("A7:D" & ARc - 2).Copy .Range("A7")
                  AWb.Sheets("表三甲").Range("E7:G" & ARc - 2).Copy .Range("E7")
                  AWb.Sheets("表三甲").Range("I7:L" & ARc - 2).Copy .Range("J7")

最佳答案

月排行榜 / 总排行榜

benhsu

2022-8-16 10:27

AWb.Sheets("表三甲").Range("A7:D" & ARc - 2).Copy
.Range("A7").PasteSpecial xlPasteValues

跳转到最佳答案楼层

benhsu · 发表于 2022-8-16 10:27

这个最佳答案由 benhsu 给出，感谢 benhsu 的回答。

单击隐藏图章

AWb.Sheets("表三甲").Range("A7:D" & ARc - 2).Copy
.Range("A7").PasteSpecial xlPasteValues

果冻的心 · 发表于 2022-8-16 10:37

benhsu 发表于 2022-8-16 10:27
AWb.Sheets("表三甲").Range("A7:D" & ARc - 2).Copy
.Range("A7").PasteSpecial xlPasteValues

感谢

		自动登录	找回密码
密码			注册