如何在vba中操作快捷键

整理答案如下：

问: 用VBA如何使快捷键失效,如使ctr+D(删除)失效?

'按a執行宏TEST
Application.OnKey "a", "TEST"

'恢復按a正常功能
Application.OnKey "a"

'按a不發生任何作業
Sub TEST3()
Application.OnKey "a", ""
End Sub

ctl+C: "^c"
ctl+V: "^v"
Alt+F4: "%{F4}"   
PageUp:"{PgUp}"
PageDown"{:PgDn}"


更多的键代码：

{BACKSPACE} or {BS} Backspace
{BREAK} Break
Caps Lock {CAPSLOCK}
{CLEAR} Clear
Delete 或 Del {DELETE} 或 {DEL}
End {END}
~（波形符） Enter
Enter（数字小键盘） {ENTER}
{ESCAPE} 或 {ESC} Esc
{F1} 到 {F15} F1 到 F15
{HELP} Help
Home {HOME}
{INSERT} Ins
Num Lock {NUMLOCK}
Page Down {PGDN}
{PGUP} Page Up
{RETURN} Return
{SCROLLLOCK} Scroll Lock
Tab {TAB}
向上键 {UP}
{DOWN} 向下键
{RIGHT} 向右键
向左键 {LEFT}


也可指定与 Shift 和/或 Ctrl 和/或 Alt 组合使用的键。要指定与其他键组合使用的键，请使用下表。

要组合的键 在键代码之前添加
Shift +（加号）
Ctrl ^（乘幂）
Alt %（百分号）