excel - 为什么我无法获取工作簿的目录？

Question

我正在尝试查找工作簿的当前目录，因为该位置会定期更改。但是，返回的路径在临时文件夹中，而不是文件所在的位置。这两种方式我都试过了。

folderPath = Replace(ThisWorkbook.FullName, templateBook, "")

或者

folderPath = ThisWorkbook.path

它们都在我第一次运行宏时工作，但是当我关闭工作簿并移动它时，我遇到了同样的问题。

注意：我使用的是 excel 2007。

Answer 1

我使用了以下代码：

folderPath = CurDir("M") & "\" & Month & " " & Year
MkDir (folderPath)

我认为它不能以其他方式工作，因为共享驱动器（M）上有保护。