2011年12月3日土曜日

[ExcelVBA] CurDir関数


■構文
CurDir[(drive)]

■説明
カレントフォルダのパスを返します。
引数は、省略した場合カレントドライブのカレントフォルダを返します。
第一引数:(省略可能)ドライブを指定します。

■サンプルコード
Option Explicit

Sub SampleCode()
    
    Debug.Print CurDir 'C:\Documents and Settings\UserName\My Documents

    ChDir "C:\Documents and Settings" 'カレントディレクトリを変更
    
    Debug.Print CurDir 'C:\Documents and Settings
End Sub

■関連
ChrDir関数

0 件のコメント: