工程师你好！我想请教一下，如果要对连续几千个Excel表格进行打开一保存一关闭的批处理怎么操作
展开全部
VBA程序代码：
Option Explicit
Sub x()
Dim pt$, fn$
pt = "D:\test\"
fn = Dir(pt & "*.xls")
While fn <> ""
With Workbooks.Open(pt & fn)
.Save
.Close
End With
fn = Dir
Wend
End Sub
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
