| 
    
     |  | 初心者 さん、こんにちは 
 初心者さんが、されたい処理をするには、
 「DefaultFilePath」ではなく、「ChDir」を使えばいいと思います。
 こんな感じ
 
 ChDir "C:\WINDOWS\デスクトップ"
 Ofname = Application.GetOpenFilename(fileFilter:="取り込みファイル(*.csv),*.csv")
 
 これで、カレントフォルダを、直前に指定できるので、
 ファイルを開くダイヤログの、デフォルトのフォルダが、任意のフォルダにできると思います。
 
 「DefaultFilePath」は、私は知らなかったのだけど、
 これはどうやら、エクセルの「ツール」−「オプション」のなかの
 「全般」の「カレントフォルダ名」を設定/取得するもののようです。
 
 それから、
 >Ofname = Application.GetOpenFilename(fileFilter:="取り込みファイル.csv),*.csv")
 この行、間違ってまっせ。
 ここは
 Ofname = Application.GetOpenFilename(fileFilter:="取り込みファイル(*.csv),*.csv")
 ですわ♪
 
 
 |  |