Excel VBA ファイル保存時の既定のフォルダを変更する-DefaultFilePath

ファイルを保存する時に名前を付けて保存をすると、ドキュメントが自動的に開きます。

それは、既定のフォルダがドキュメントに設定してあるからです。

既定フォルダの設定は、［ファイル］＞［その他］＞［オプション］＞［保存］＞［既定のローカルファイルの保存場所］で設定できます。

これをVBAでやってみます。

既定のローカルファイルの保存場所の取得、設定には「DefaultFilePath」プロパティを使います。

< スポンサーリンク >

「DefaultFilePath」構文

ファイルを開くときにMicorosoft Excelが使用する既定のパスを設定または取得します。

既定のフォルダの設定例

取得する

既定のフォルダを取得してメッセージで表示してみます。

Sub test()
  MsgBox Application.DefaultFilePath
End Sub

設定する

既定のフォルダをデスクトップに変更してみます。

Sub test()
    Application.DefaultFilePath = “C:\Users\admin\Documents”
End Sub