[ファイルを開く]ダイアログボックスを表示する（GetOpenFilenameメソッド）：Excel VBA｜即効テクニック｜Excel VBAを学ぶならmoug

■1つのファイルを選択する サンプル1では、ファイルの種類にcsvファイルを指定して、[ファイルを開く]ダイアログボックスを表示します。 ファイルを選択すると、そのファイルのフルパスがメッセージボックスに表示されます。 GetOpenFilenameメソッドの戻り値はバリアント型です。 ファイルを選択すると、そのパスを返すだけで、実際にファイルは開かれません。 ［キャンセル］ボタンをクリックしたり、［×］ボタンでダイアログボックスを閉じるなど、ファイルの選択をキャンセルした場合はFalseを返します。 キャンセルされたかどうかはVarType関数で判定します。 ●サンプル1● Sub Sample1() Dim myFile As Variant ChDir "C:\Data" myFile = Application.GetOpenFilename("CSVファイル(*.csv),*.c

[wlbhiro]

Fileオープン

[izoc]

GetOpenFilenameメソッドの引数説明