在 VBscript 中创建相对于工作簿 运行 宏的目录
Make directory in VBscript relative to workbook running the macro
我正在使用以下内容创建文件夹：
Dim oFSO
Set oFSO = CreateObject("Scripting.FileSystemObject")
' Create a new folder
oFSO.CreateFolder "C:\MyFolder"
但我希望文件夹位置与 excel 工作簿 运行 代码位于同一位置。
您可以使用
ThisWorkbook.Path
到return当前工作簿的路径。
像这样：
Dim oFSO As Object
Set oFSO = CreateObject("Scripting.FileSystemObject")
oFSO.CreateFolder ThisWorkbook.Path & "\MyFolder"
我正在使用以下内容创建文件夹：
Dim oFSO
Set oFSO = CreateObject("Scripting.FileSystemObject")
' Create a new folder
oFSO.CreateFolder "C:\MyFolder"
但我希望文件夹位置与 excel 工作簿 运行 代码位于同一位置。
您可以使用
ThisWorkbook.Path
到return当前工作簿的路径。
像这样：
Dim oFSO As Object
Set oFSO = CreateObject("Scripting.FileSystemObject")
oFSO.CreateFolder ThisWorkbook.Path & "\MyFolder"