FileSystemObjectオブジェクト - BuildPathメソッド




【書式】
FileSystemObject.BuildPath(path, name)

指定したパス(path)の末尾に、新しいフォルダ名(name)を追加したパスを返します。
BuildPathメソッドは、新しいパス名を文字列として生成するだけです。実際に新しいフォルダが作成されるわけではありません。
引数pathに、存在しないパスを指定してもエラーになりません。 
Sub test2()
    ''カレントフォルダの後ろに新しいフォルダ名を追加します
    Dim FSO As Object, buf As String
    Set FSO = CreateObject("Scripting.FileSystemObject")
    buf = InputBox("新しいフォルダ名は？")
    MsgBox FSO.BuildPath(CurDir, buf)
    Set FSO = Nothing
End Sub