VBA打开文件夹内所有的.XLSX和.XLS的文件
luj=ThisWorkbook.Path&"\汇总示意表\"ba=Dir(luj&"*.xlsx")...
luj = ThisWorkbook.Path & "\汇总示意表\"
ba = Dir(luj & "*.xlsx") 展开
ba = Dir(luj & "*.xlsx") 展开
1个回答
展开全部
luj = ThisWorkbook.Path & "\汇总示意表\"
ba = Dir(luj & "*.xls*")
While ba <> ""
Workbooks.Open luj & ba
Wend
ba = Dir(luj & "*.xls*")
While ba <> ""
Workbooks.Open luj & ba
Wend
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
