VBAのGetOpenFilenameについて

質問

VBAのGetOpenFilenameについての質問です。
このメソッドを使用すると一番初めは"マイドキュメント"内のdirが表示されるのですが、このデフォルトの指定を変更することは可能でしょうか。
一度ファイルを指定してやると、次回からはそのファイルのdirが
はじめに開くので、できると思うのですが、方法がどこにも載ってません。
ご存知の方、よろしくお願いします。

回答No.1

hana-hana3 · ベストアンサー

ChDir / ChDrive で、ドライブ名とパスをセットしてからGetOpenFilenameを実行すると任意のフォルダを開く事が出来ます。

Dim WorkPath As String
WorkPath = ActiveWorkbook.Path
ChDir = WorkPath
ChDrive = WorkPath

お礼

ありがとうございます！！！
できました。ほんとうにありがとうございます！

回答No.2

Hardking

EXCELのメニューで「ツール」⇒「オプション」⇒「全般タグ」
のカレントフォルダー名に設定値がデフォルトですが
GetOpenFilenameで任意にパスを指定するには
(1)ChDrive関数 ... ドライブ指定（ドライブ変更の必要がある場合）
(2)ChDir関数 ... ディレクトリ指定

例
ChDrive "D:\"
ChDir"D:\test"