VB6・VBA関数メモ：ChDriveステートメント

ChDriveステートメントについてメモしておきます。

このステートメントはカレントドライブを変更する際に使用します。

ChDirステートメントで異なるドライブのフォルダを
カレントフォルダに指定する場合等に使用します。

説明	記述例	出力
異なるドライブのフォルダをカレントフォルダに指定	Debug.Print "" & CurDir() Call ChDrive("D") Call ChDir("D:¥Dir1¥") Debug.Print "→" & CurDir()	C:¥Dir1 →D:¥Dir1

説明	記述例	出力
存在しないドライブを指定するとエラー	On Error GoTo ERR_HANDLER Call ChDrive("Z") ERR_HANDLER: If Err > 0 Then Debug.Print Error	デバイスが準備されていません。
空欄を指定してもエラーにならない	On Error GoTo ERR_HANDLER Call ChDrive("") ERR_HANDLER: If Err > 0 Then Debug.Print Error
複数文字あっても最初の１文字のみを使用	Debug.Print "" & CurDir() Call ChDrive("DEFG") Debug.Print "→" & CurDir()	C:¥Dir1 →D:¥Dir1

説明

記述例

出力

存在しないドライブを指定するとエラー

On Error GoTo ERR_HANDLER

    Call ChDrive("Z")

ERR_HANDLER:
    If Err > 0 Then Debug.Print Error

デバイスが準備されていません。

空欄を指定してもエラーにならない

On Error GoTo ERR_HANDLER

    Call ChDrive("")

ERR_HANDLER:
    If Err > 0 Then Debug.Print Error

複数文字あっても最初の１文字のみを使用

Debug.Print "" & CurDir()

Call ChDrive("DEFG")

Debug.Print "→" & CurDir()

C:¥Dir1
→D:¥Dir1

フィロの村note