如何在启用excel时自动运行VBA的某个宏？-vba打开指定excel文件,vba按路径打开excel文件

那肯定就是文件路径不对喽 你完全可以msgbox CStr(varFileList(l)) 来看看这个变量具体是什么内容 核对下就清楚了

1、首先将Excel文档（默认新建扩展名为xlsx），另存为启用宏的zhidao工作簿，扩展名为xlsm。

2、按下组合键ALt+F11快速切换到VBA窗口。

3、进入VBA窗口后的界面，如图所示。

4、双击ThisWorkbook后，会弹出一个代版码窗口。

5、在代码窗口中复制粘贴权以下代码：Private Sub Workbook_Open()，MsgBox ("欢迎您使用Excel2013")，End Sub。

6、保存，关闭，重新打开Excel（扩展名为xlsm）文档，效果如图所示。

Option Explicit
Sub main()
    Dim wb As Workbook
    Set wb = Workbooks.Open("d:\1.xlsm")
    Application.Run "1.xlsm!tt"
    wb.Close
    Set wb = Nothing
End Sub

这是zhidao个示例，我把两工作簿都在D盘了根目录运行的，版你可以改代码，也可以该路径权，详见附件

可以用
workbooks.open "d:\d.xls"
application.run "d.xls!macro"
来打开某文件并运行宏

本文标签：vba打开指定excel文件(1)vba按路径打开excel文件(1)