摘要： 如果需要在打开Excel工作簿时自动运行某个宏，可以用下面的两个方法： 一、Workbook.Open 事件 1.在Excel中按快捷键Alt F11，打开VBA编辑器。
2.在“工程”窗口中双击“Thi...
如果需要在打开Excel工作簿时自动运行某个宏，可以用下面的两个方法：
一、Workbook.Open 事件
1.在Excel中按快捷键Alt F11，打开VBA编辑器。
2.在“工程”窗口中双击“ThisWorkBook”，在右侧的代码窗口顶部左侧的“对象”框中，选择“WorkBook”。这时，Excel自动在代码窗口中输入下面的代码：
Private Sub Workbook_Open()
End Sub
然后在其中输入需要执行的宏代码，如下例：
Private Sub Workbook_Open()
MsgBox ("Workbook_Open事件" & Chr(10) & ThisWorkbook.Name & "工作簿已打开！")
End Sub
excel利用快捷键将区域中的公式结果转换为数值
在使用Excel时，如果经常需要将某些区域中的公式结果转换为数值，可以使用下面的VBA代码，并将其指定一个快捷键。这样，用快捷键就可以快速将某些区域中的公式结果转换为数值。方法如下： 1.按Alt F11，打开VBA编辑器，单击菜单“插入→模块”。 2.在右侧的代码窗口中输入下列VBA
3.保存工作簿并重新打开该工作簿。如上例中将弹出一个消息框。
二、用Auto_Open宏
1.在Excel中按快捷键Alt F11，打开VBA编辑器。
2.单击菜单“插入→模块”，在右侧的代码窗口中输入名称为“Auto_Open”的宏，如下面的代码：
Sub Auto_Open()
MsgBox ("Auto_Open" & Chr(13) & "已打开" & ThisWorkbook.Name & "工作簿！")
End Sub
3.保存工作簿并重新打开该工作簿。如上例中将弹出一个消息框。
上述两种方法可以同时存在，但在打开工作簿时按照先“Workbook_Open“后“Auto_Open”的顺序执行。
如何用VBA检查Caps Lock键是否打开
要用VBA代码判断Caps Lock键、Num Lock键及Scroll Lock键的开启状态，可以用下面的代码，前四行代码为API声明，需放置在代码窗口的最上方： Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey A
