为什么我不能获得工作簿的目录？

Question

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

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

OR

folderPath = ThisWorkbook.path

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

注意：我正在使用excel 2007。

Answer 1

我使用了以下代码：

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

我认为它没有其他方式，因为共享驱动器（M）上有保护。