Excel 2013 VBA Workbooks.Open以错误的文件名打开
当我尝试使用Excel VBAmacros中的Workbooks.Open命令打开某个目标.xls文件时，打开目标Excel文件，并在文件名末尾附加“1”。 这个改变的文件名出现在文件窗口（）中。 随着每个后续尝试（手动closures目标Excel文件并重新运行脚本），目标文件名末尾的附加数字将加1。
目标Excel文件本身似乎没有损坏，因为我可以在Windows资源pipe理器中手动打开文件没有任何问题。 另外，当我这样打开它时，文件名显示正确（没有在末尾附加“1”）。 查看资源pipe理器窗口中的“types”列，它显示目标文件是“Microsoft Excel 97-2003工作表”，因此文件扩展名与实际的文件格式匹配。
以下是我正在使用的代码：
Public Sub Import_TD_TVs() Dim ActiveWB As Workbook Dim srcTDWB As Workbook Dim wkbkStr As String Set ActiveWB = ActiveWorkbook wkbkStr = "X:\sites\DTS_Data_Files.xls" Set srcTDWB = Workbooks.Open(wkbkStr, , False) End Sub 任何援助在这个问题将不胜感激！
如果目标工作簿最初保存为模板（.xlt）文件，然后在Windows资源pipe理器中手动更改（到.xls），则会发生这种情况。 您可以打开目标工作簿并执行“另存为…”为.xls文件格式。