FileDialog プロパティ
FileDialog オブジェクト を取得します。引数に、ダイアログボックスの種類を表す MsoFileDialogType 列挙型 の定数を指定します。
実際にダイアログボックスを表示したり、指定したファイルを開いたりするには、FileDialog オブジェクト の Show メソッド や Execute メソッド を使用します。
FileDialog オブジェクト に関する詳細は、「ファイル」のダイアログボックスを表示(FileDialog オブジェクト) を参照して下さい。
【書式】
object.FileDialog ( filedialogtype )
引数・戻り値
- object ・・・ 対象となる Application オブジェクトを指定します。
- filedialogtype ・・・ ダイアログボックスの種類を表す MsoFileDialogType 列挙型の定数またはその値を指定します。
定数 値 内容 msoFileDialogOpen 1 「ファイルを開く」ダイアログボックス msoFileDialogSaveAs 2 「名前を付けて保存」ダイアログボックス msoFileDialogFilePicker 3 「参照」ダイアログボックス(ファイルを選択) msoFileDialogFolderPicker 4 「参照」ダイアログボックス(フォルダを選択)
FileDialog プロパティ 使用例
サンプルVBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
Sub Sample_FileDialogProperty() With Application.FileDialog(msoFileDialogOpen) .Filters.Clear .Filters.Add Description:="Excel ファイル", _ Extensions:="*.xlsx, *.xlsm" If .Show = -1 Then .Execute End With End Sub |
実行結果
Sample_FileDialogProperty を実行
「test.xlsx」を選択して「開く」をクリック