
FileSystemObjectのGetParentFolderNameメソッドについてです。
GetParentFolderNameメソッド
概要
指定したパスの親のフォルダーパスを返します。
構文
FileSystemObject.GetParentFolderName(path)
GetParentFolderNameメソッドの引数
引 数 | 必須 / 省略可 | 詳 細 |
パス | 必須 | ・フォルダーパスを指定。 |
※指定したフォルダーの存在は確認できません。指定したフォルダー名が違っても親フォルダーパスは取得できます(親フォルダーがある場合)
VBAサンプル
サンプル1
FolderExistsメソッドで指定したフォルダーが存在するかを判定してから親フォルダーパスを取得。
1 2 3 4 5 6 7 8 9 10 11 12 13 | Sub test() Dim path As String: path = "D:\sample\test" Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") 'FolderExistsで指定したフォルダーが存在するかを判定してから処理 If fso.FolderExists(path) Then Debug.Print fso.GetParentFolderName(path) Else MsgBox "指定したフォルダーが存在しません" End If End Sub |
【結果】
D:\sample