打开文件而不调用Filepath

Question

我正在使用excel VBA.我想按一个按钮直接打开另一个文件,而不会"选择文件窗口".

这是当前的代码:

Sub loadFile_click()
Workbooks.Open("C:\Users\GIL\Desktop\ObsReportExcelWorkbook.xlsx")
End Sub

在这种情况下,该文件与主文件位于同一文件夹中.

有没有办法在不输入文件路径的情况下执行此操作？

Answer 1

如果文件名已修复,则可以使用ActiveWorkbook.Path函数返回当前工作簿的路径:

Dim FileName as string FileName = ActiveWorkbook.Path & "\myfile.xlsx

检查是否需要额外的斜杠字符.

Answer 2

如果该文件与包含VBA宏的文档位于同一文件夹中,请使用

ThisWorkbook.Path

例如:

Workbooks.Open(ThisWorkbook.Path & "\ObsReportExcelWorkbook.xlsx")

(即使文档不再是活动文档,或者您更改了当前目录,这也有效).