| 现在的位置：首页 > 会员中心 > 查看信息：【vba代码】替换多份excel报告里内容 |
|
|
| 查看权限： |
需要 [年费会员] 级别以上才能查看。
|
| 发布时间： |
2023-04-19 05:13:07
|
| 信息简介： |
Sub 替换excel()
Dim arr, MyPath$, MyName$, sh As Worksheet, i&
arr = [h1].CurrentRegion
MyPath = ThisWorkbook.Path & "\"
MyName = Dir(MyPath & "*.xls*")
Application.ScreenUpdating = False
Do While MyName <> ""
I
|
|
|
