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

GetDriveメソッドは指定されたパスのドライブのDriveオブジェクトを返します。

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

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

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

Contents

GetDriveメソッドの構文

構文

ファイルシステムオブジェクト.GetDrive(ドライブ文字(Drivespec))

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

構成要素と引数

要素／引数	必須／任意	説明
ファイルシステムオブジェクト (FSO)	必須	ファイルシステムオブジェクトを指定します。
ドライブ文字 (Drivespec)	必須	ドライブ文字や、コロンつきドライブ文字、区切り記号が付加されたドライブ文字、または任意のネットワーク共有仕様を文字列で指定します。

その他のポイント

ドライブ文字(drivespec)で指定した文字列が、許容されないもであったり、認識されない場合はエラーが発生します。

ドライブ文字(drivespec)でネットワーク共有を指定した場合、共有が存在するかを調べることができます。

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

以下のマクロは、GetDriveメソッドをつかってドライブオブジェクトを取得し、Driveオブジェクトのプロパティを利用してドライブパスなどの各種項目をイミディエイトウィンドウに表示します。

サンプルコード

Option Explicit

Sub ファイルシステムオブジェクト_GetDriveメソッド()
    
    'ファイルシステムオブジェクトを使うため準備
    
    '①事前バインディングの場合はVBEのツールより参照設定で「Microsoft Scripting Runtime」にチェックをしてください。
    Dim FSO As FileSystemObject
    Set FSO = New FileSystemObject

    Dim DriveObject As Object
    
    'GetDriveメソッドの使用例(ドライブ文字)
    Set DriveObject = FSO.GetDrive("C")
    '("C:")、("C:\")でも指定可能
    
    'Driveオブジェクトのプロパティを使用する
    Debug.Print "①"; DriveObject.PATH 'ドライブのパスを返します。
    Debug.Print "②"; DriveObject.DriveLetter 'ドライブ文字の大文字を返します。
    Debug.Print "③"; DriveObject.FileSystem 'ドライブのファイルシステムを返します
    Debug.Print "④"; DriveObject.IsReady 'ドライブの準備状態をTrue／Falseで返します。
    Debug.Print "⑤"; DriveObject.VolumeName 'ドライブのボリューム名を設定するか返します。

End Sub