Excel VBA好强大，把Excel变成了机器人

如果需要Excel源码请在评论区留言，点击关注转发，然后直接回复私信：源码

应用对象

应用对象

实例SendKeys方法退出Excel程序

SendKeys方法将一个或多个击键消息发送到活动窗口，就像在键盘上打字一样。例如，在本例中，直接按ALTF4组合键即可退出Excel应用程序。

示例代码：

#001公共子实例()

#002MsgBox'Excel即将退出，请保存数据'

#003ApplicationSendKeys'%{f4}''退出Excel程序，与手动按ALTF4组合键退出相同。

#004'或使用以下代码表示按ALTFX键退出程序

#005'ApplicationSendKeys('%fx')'退出Excel程序

#006结束子

运行结果如下：

SendKeys方法退出Excel程序

代码说明：

详细信息请参见代码注释。

知识拓展点：

将一个或多个击键消息发送到活动窗口，就像在键盘上打字一样。

语法

ExpressionSendKeys（键，等待）

表达式表示应用程序对象的变量。

范围

阐明

此方法将击键放入键盘缓冲区中。在某些情况下，必须在调用使用击键的方法之前调用此方法。例如，如果要将密码发送到对话框，则必须在显示对话框之前调用SendKeys方法。

Keys参数可以指定任何单个键或Alt、Ctrl或Shift的组合键（或这些键的组合）。每个键可以由一个或多个字符表示。例如，“a”表示字符a，或“{ENTER}”表示Enter。

要指定屏幕上没有该字符回显的键（例如Enter或Tab），请使用下表中列出的对应键的代码。表中的每个代码代表键盘上的相应键。

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

为了说明SHIFT、CTRL和ALT的任意组合应与其他键同时按下，请将这些键的代码放在括号中。例如，要指示在按E和C的同时按SHIFT键，请使用“(EC)”。要说明在按下E的同时按下SHIFT键，然后按下C而不按下SHIFT，请使用“EC”。

要指定重复的键，请使用{keynumber}形式。键和数字之间必须放置一个空格。例如，{LEFT42}表示按LEFTARROW键42次；{h10}表示按H键10次。

请注意，您无法使用SendKeys将击键消息发送到并非设计为在MicrosoftWindows或Macintosh上运行的应用程序。Sendkeys也无法将PRINTSCREEN击键{PRTSC}发送到任何应用程序。

最近，我一直在免费发送ExcelVBA示例教程。如果需要Excel源码请在评论区留言，点击关注转发，然后直接回复私信：源码

一些示例图片：

部分示例图