VBA：如何自动运行sub？

Question

我想在创建宏的模板加载到文档或文档打开或新文档事件时自动运行模块内的子。我的宏是一个将在不同计算机上使用的模板。是否有模块代码可以做到这一点？

Answer 1

将此代码放在工作簿对象

上

Private Sub Workbook_Open()
    Application.OnKey "{F12}", "Module1.Testing"
End Sub

其中：

• {F12}是功能键12。

• Module1.Testing是你的子程序。

  在MS Word的进一步Q / A VBA之后编辑：

文件公开活动

Private Sub Document_Open()
  Module1.Testing
End Sub

或

新文件事件

Private Sub Document_New()
  Modul1.Testing
End Sub