先做一个粘贴数值的宏,如下面代码:
Sub abc()
'粘贴数值
Selection.PasteSpecial Paste:=xlPasteValues
End Sub
再做一个指定ctrl+alt+v快捷键的宏:
Sub 指定快捷键()
'给宏abc指定快捷键为ctrl+alt+v
Application.OnKey "^%{v}", "abc"
End Sub
然后执行“指定快捷键”这个宏后,就可给“粘贴数值”功能指定快捷键了。
你直接复制粘贴就是,为什么要把选择性粘贴改为粘贴呢?晕
是啊,谁知道指点一下