Question

当前代码是：

Set Workbook = Workbooks.Open("Z:\test\bankinfo20180815.xls")

文件夹中的文件将更改。例如：昨天是bankinfo20180814.xls，今天是bankinfo20180815.xls，明天是bankinfo20180816.xls。因此，我想知道如何在VBA代码中指定指向以“ bankinfo”开头的文件吗？

Answer 1

尝试一下：

MyFile = "Z:\test\bankinfo"
Set Workbook = Workbooks.Open(MyFile & "*.xls")

希望这会有所帮助！

Answer 2

您可以使用*之类的通配符，但是如果有多个文件，则可能会打开错误的文件，因此更好的方法是确保打开的文件正确。

 Sub OpenMyWB()
    sdir = "Z:\test\"
    sFile = Dir(sdir & "bankinfo" & Format(Date, "yyyymmdd") & ".xls")
    Set wb = Application.Workbooks.Open(sdir & sFile)
End Sub

Excel VBA：如何指向相对目录（文件名每天都会更改）？

2 个答案: