カレントフォルダ（CurDir 関数、ChDir ステートメント、ChDrive ステートメント）

サイト管理人

9年前

カレントフォルダ

カレントフォルダとは、ブックを開いたり保存するときに既定で参照する場所のことです。カレントフォルダを取得するには、CurDir 関数 を使用します。カレントフォルダを変更するには、ChDir ステートメントを、カレントドライブを変更するには、ChDrive ステートメント を使用します。

CurDir 関数

引数で指定したドライブのカレントフォルダのパスを表す文字列型（String）の値を取得します。

【書式】

string = CurDir( [ drive ] )

引数・戻り値

drive ・・・ドライブ名を文字列で指定します。省略すると現在のカレントドライブを指定します。「C:」のように指定します。

ChDir ステートメント

引数で指定したパスにカレントフォルダを変更します。ただし異なるドライブのパスを指定することはできません。

【書式】

ChDir( path )

引数・戻り値

path ・・・カレントフォルダに設定したいパスを文字列で指定します。

ChDrive ステートメント

ChDir ステートメントでは、ドライブを変更することができません。異なるドライブの任意のフォルダをカレントフォルダに設定したい場合、先に、ChDrive ステートメントを実行しカレントドライブを変更しておきます。

【書式】

ChDrive( drive )

引数・戻り値

drive ・・・ドライブ名を指定します。
（例）ChDrive = “D”　（カレントドライブを D ドライブに変更）

CurDir 関数使用例

サンプルVBAソース

　    
Sub Sample_ExportAsFixedFormat()　
    
    'カレントフォルダ を「C:\Users」に変更
    ChDir("C:\Users")
    
    '現在のカレントフォルダのパスを表示
    MsgBox CurDir("C:")
    
End Sub

Sub Sample_ExportAsFixedFormat()　

'カレントフォルダを「C:\Users」に変更

ChDir("C:\Users")

'現在のカレントフォルダのパスを表示

MsgBox CurDir("C:")

End Sub