VBA:如何遍历文件夹下面所有工作簿，然后每个工作簿添加一个新工作表 10
展开全部
使用dir可以编列文件夹，一般结构是：
path="d:\xls\"
filename=dir(path & "*.xls*")
while filename<>""
set wb=workbooks.open(path & filename)
wb.sheets.add
wb.save
wb.close
filename=dir
wend
追问
最后一行wend是什么
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
