Excel VBA创建文件夹

Question

我有一个电子表格，我想创建一个宏按钮，该按钮将允许用户浏览到文件夹目标。

我想我已经拥有了这张纸：

OpenAt = "O:\Test\"

Set ShellApp = CreateObject("Shell.Application").BrowseForFolder(0, "Please Choose The Folder For This Project", 0, OpenAt)


'Set the folder to that selected. (On error in case cancelled)

On Error Resume Next
BrowseForFolder = ShellApp.Self.path

接下来，我想根据在J，K，L，M，N列中输入的值来构建文件夹层次结构。这些列的每一行都需要创建自己的文件夹结构。

谢谢