Excel VBA用于打开文件并每月更改文件名

我想要一个VBA代码来打开一个文件，它的名称每个月都在更改

ChDir "S:\Credit_Risk\MIS\Consolidated Customer profile Macro\Securities"

Workbooks.Open Filename:= _
    "S:\Credit_Risk\MIS\Consolidated Customer profile Macro\Securities\Enterprise  pending cases as at end of Oct.2016.xls"

---

如果您将文件放在只包含您的文件的子目录中，任何人都可以提供帮助，您可以使用以下方法打开文件：

Workbooks.Open Filename:= _
"S:\Credit_Risk\MIS\Consolidated Customer profile Macro\Securities\Enterprise  pending cases as at end of " & Format(Date, "MMM.YYYY") & ".xls"

ChDir "S:\Credit_Risk\MIS\Consolidated Customer profile Macro\Securities\myFile\"
myFiles= Dir("*.*")
While myFiles<> ""
Workbooks.Open myFiles

ChDir“S:\Credit\u Risk\MIS\Consolidated Customer profile Macro\Securities\myFile”
myFiles=Dir（“*.*”）
而我的文件“”
工作簿。打开我的文件

我有5个文件要在名称更改的同一位置打开，因此如何在不进行调试的情况下打开它们而不引用全名？能否将这5个文件放在5个子目录中，并在每次更改名称时替换它们？因此，无论他们有什么名字，你的程序都将读取相同的位置。