excel选择性粘贴数值的宏。

2024-11-28 13:56:51
推荐回答(1个)
回答1:

Sub 选择性粘贴()
    Set rng1 = Application.InputBox("请使用鼠标选择【复制】区域:", , , , , , , 8)
    Set rng2 = Application.InputBox("请使用鼠标选择【粘贴】区域的首个单元格:", , , , , , , 8)
    rng1.Copy
    rng2.PasteSpecial Paste:=xlValues
End Sub