VBA之前打开文件夹
我想每次打开当前目录之前的文件夹。 我试过“..”，但没有奏效，你能帮我一下吗？
ThecurrentDirectory= fso.GetParentFolderName(objFile) Set myWorkBook = myxlApplication.Workbooks.Open( ThecurrentDirectory & "\..\CLIENTS.xlsx" ) 只需将ThecurrentDirectory包装在另一个fso.GetParentFolderName中。
ThecurrentDirectory= fso.GetParentFolderName(objFile) Set myWorkBook = myxlApplication.Workbooks.Open( fso.GetParentFolderName(ThecurrentDirectory) & "\CLIENTS.xlsx" )
如果objFile是一个文件对象，那么您可以将它的ParentFolder属性链接在一起多次以获得分散的结果：
Dim fso, f Set fso = WScript.CreateObject("Scripting.Filesystemobject") Set objFile = fso.GetFile("C:\Users\best buy\Downloads\stackoverfow\test.xlsm")
输出：
- objFile.ParentFolder.ParentFolder = C：\ Users \ best buy \ Downloads