有没有办法让每个Excel文件打开时运行一个VBA脚本?
我正在寻找的是在每个创build的Excel文件上运行auto_open()函数。 有没有办法可以实现?
- 在即时窗口中键入
?Application.StartupPath
以查找您的XLSTART
文件夹。 - 在这个文件夹里面,会有一个名为
Book.xlt
的模板文件或类似的东西。 - 打开该文件并将
Auto_Open()
事件放入该模板中,然后将其作为模板保存在XLSTART
文件夹中。 确保它实际保存在正确的地方,并覆盖原来的模板。 注意:您可能必须将模板文件types更改为.xltm
并删除原始.xlt
版本,因为它将包含macros。 - 您的
Auto_Open()
事件现在应该在您创build的每个新文件中。
启动Excel时自动打开工作簿模板或工作表模板
您将需要一个包含要运行的代码的单独工作簿,例如,您的个人macros工作簿。 在该工作簿的Thisworkbook模块中,添加以下内容:
Private WithEvents appExcel As Excel.Application Private Sub Workbook_Open() Set appExcel = Application End Sub Private Sub appExcel_WorkbookOpen(ByVal Wb As Workbook) Call Macro1 End Sub
其中Macro1是您要为每个工作簿运行的代码。