Excel VBA-为变量分配文件夹路径

Question

我正在尝试将文件夹路径指定为字符串，以便以后可以引用该路径。下面是一些通往该文件夹路径的代码。

Dim fzp as String
Dim fPath As String
Dim fso As Object
Dim subFold

fPath = "I:\PROJECTS\" & ProjNam & "\" & ProjNum
fso.createfolder (fPath & "copy")
fso.CopyFolder "S:\Global\Specifications\Proposal Packages\" & ProjNum & "*", fPath & "copy\"
With fso
Set subFold = .getfolder(fPath & "copy")
Set subFold = subFold.Subfolders

现在，当我在本地窗口中查看时，看到subFold和Item(1)的路径为“ I：\ PROJECTS \ Foo \ bar \ Subfoldername”

我想要整个路径，所以我尝试了：

fzp = subFold.Path
fzp = subFold.Item(1).Path
fzp = .Item(1).Path
fzp = .Path

可能有20种不同的迭代没有成功。

您知道如何将文件夹路径分配给字符串值或正确引用它吗？