VBA打开文件夹内所有的.XLSX和.XLS的文件

luj = ThisWorkbook.Path & "\汇总示意表\"
ba = Dir(luj & "*.xls*")
While ba <> ""
Workbooks.Open luj & ba
Wend

温馨提示：答案为网友推荐，仅供参考

当前网址：https://verywind.cn/ee/f2v3eyy3jvvxvyr7ye.html