Folderオブジェクト


カレントフォルダのパスを取得する (Path プロパティ)


'//カレントフォルダのパスを取得する
Dim objFS, objFolder
Dim strPath
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFS.GetFolder(".")
strPath = objFolder.Path

戻る