Не ответ на ваш вопрос, но если вы щелкните правой кнопкой мыши-> Refactor-> Rename a property, он также может переименовать соответствующие строки, включая любые строки, соответствующие имени вашего свойства.
Да, это может быть немного опасно.
Это будет в духе
file1 = dir("c:\rootdir\" & "*" & "ASFC" & "*" &".xlsx")
Workbooks.Open Filename:= file1
Но если у вас есть более 1 файла в этом каталоге с «ASFC», кто знает, что он получит