[已解决]vba 能不能使用通配符*或者？

zzxuexi

想通过宏重命名文件名，但是文件名后面的数字是随机的。想用通配符，但是一直报错。原文件名为GENERAL_498533034151.xls  想修改为GENERAL.xls 不知道有什么好方法可以实现。


Sub 宏1()
Dim OldName As String, NewName As String

OldName = ThisWorkbook.Path & "\GENERAL_" & "*" & ".xls"
NewName = ThisWorkbook.Path & "\GENERAL.xls"

Name OldName As NewName

End Sub

最佳答案

月排行榜 / 总排行榜

chart888

2017-7-17 20:39

这类软件很多的，比如：
批量修改文件名 3.7
http://www.onlinedown.net/soft/552168.htm

跳转到最佳答案楼层

望帝春心

用LIKE，可以的

chart888

这类软件很多的，比如：
批量修改文件名 3.7
http://www.onlinedown.net/soft/552168.htm

zzxuexi

Dim OldName As String, NewName As String, cmd As String

OldName = ThisWorkbook.Path & "\GENERAL_" & "*" & ".xls"
NewName = "GENERAL.xls"

Shell "cmd.exe /c ren " & OldName & " " & NewName
这个可以正常修改。