VBA｜GetDriveNameメソッド(ファイルシステムオブジェクト)

GetDriveNameメソッドは指定されたパスのドライブ名を含む文字列を返します。

※ファイルシステムオブジェクト(FileSystemObject)についてはこちら

VBA｜ファイルシステムオブジェクト(FileSystemObject)でファイルやフォルダを操作する

VBAではファイルやフォルダを操作するときにつかえる便利なファイルシステムオブジェクト(FileSystemObject)の利用ができます。この記事ではファイルシステムオブジェクトをあつかうための方法や、使える機能(メソッドやプロパティ)を紹介しています。

Contents

GetDriveNameメソッドの構文

構文

ファイルシステムオブジェクト.GetDrive(パス(Path))

GetDriveNameメソッドの構成要素と引数

構成要素と引数

要素／引数	必須／任意	説明
ファイルシステムオブジェクト (FSO)	必須	ファイルシステムオブジェクトを指定します。
パス (Path)	必須	ドライブ名を取得するパスを指定します。パスが実在しなくてもドライブ名を返します。

その他のポイント

パス(Path)で指定した文字列からドライブを特定できない場合には空文字””を返します。

パス(Path)で指定した文字列ドライブ名を返すのみであり、実在するかの判定やパスの問題解決はしません。

GetDriveNameメソッドをつかったサンプルマクロ

サンプルコード

Option Explicit

Sub ファイルシステムオブジェクト_GetDriveNameメソッド()
    
    'ファイルシステムオブジェクトを使うため準備
    
    '①事前バインディングの場合はVBEのツールより参照設定で「Microsoft Scripting Runtime」にチェックをしてください。
    Dim FSO As FileSystemObject
    Set FSO = New FileSystemObject
    
    'GetDriveNameメソッドの使用例
    Debug.Print "①"; FSO.GetDriveName("C:\Users\ユーザー名\Desktop\Test")
    Debug.Print "②"; FSO.GetDriveName("D:\Documents")
    
End Sub

実行結果

①C:
②D: