2023年12月22日发(作者：)

OnKey方法

当按特定键或特定的组合键时运行指定的过程。

(Key, Procedure)

expression 必需。该表达式返回一个 Application对象。

Key String 类型，必需。用于表示要按的键的字符串。

Procedure Variant 类型，可选。表示要运行的过程名称的字符串。如果

Procedure参数为空文本 ("")，则按 Key 时不发生任何操作。OnKey方式将更改击键在 Microsoft Excel 中产生的正常结果。如果省略 Procedure参数，则

Key 产生 Microsoft Excel 中的正常结果，同时清除先前使用 OnKey方法所做的特殊击键设置。

说明

Key参数可指定任何与 Alt、Ctrl 或 Shift 组合使用的键，还可以指定这些键的任何组合。每一个键可由一个或多个字符表示，比如"a" 表示字符 a，或者"{ENTER}" 表示 Enter。

若要指定按对应的键（例如 Enter 或 Tab）时的非显示字符，请使用下表所列出的代码。表中的每一代码代表键盘上的一个对应键。

键 代码

Backspace

Break

{CAPSLOCK}

Clear

{DELETE} 或 {DEL}

{BACKSPACE} or{BS}

{BREAK}

Caps Lock

{CLEAR}

Delete 或 Del

End

{END}

Enter

~（波形符）

Enter（数字小键盘）

{ESCAPE} 或 {ESC}

{F1} 到 {F15}

{HELP}

Home

{INSERT}

Num Lock

Page Down

{PGUP}

{ENTER}

Esc

F1 到 F15

Help

{HOME}

Ins

{NUMLOCK}

{PGDN}

Page Up

{RETURN}

Return

Scroll Lock

{TAB}

{UP}

向下键

向右键

{LEFT}

{SCROLLLOCK}

Tab

向上键

{DOWN}

{RIGHT}

向左键

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

要组合的键

Shift

Ctrl

Alt

在键代码之前添加

+（加号）

^（插入符号）

%（百分号）

若为特定字符指定处理过程（如 +、^、% 等等），可将此字符用圆括号括起。有关详细信息，请参阅示例。

Excel VBA教程：OnKey方法·示例

本示例为 Ctrl+ 加号分配“InsertProc”过程，并为 Shift+Ctrl+ 向右键分配“SpecialPrintProc”过程。

"^{+}", "InsertProc"

"+^{RIGHT}", "SpecialPrintProc"

本示例将 Shift+Ctrl+ 向右键重新设为正常的含义。

"+^{RIGHT}"

本示例将 Shift+Ctrl+ 向右键设为不发生任何操作。

"+^{RIGHT}", ""