[数分]:近期使用Excel的一些小结

9次阅读
没有评论

近期在对xlsm文件反复调用宏的过程中,有以下几点细节可以帮助改进效率:

1、限定处理文件格式

fileName = Dir(folderPath & "*.xlsm")

2、跳过自动更新链接,同时非只读

 Set wbSource = Workbooks.Open( _
     fileName:=folderPath & fileName, _UpdateLinks:=0, _ReadOnly:=False)

3、循环需要调用宏

Application.Run "'" & wbSource.Name & "'!宏名_Click"

4、关闭源工作簿,不保存更改

wbSource.Close SaveChanges:=False

5、释放对象,加快运行速度

 Set wsInput = Nothing
 Set wsAn = Nothing
 Set wbSource = Nothing
正文完
 0
评论(没有评论)