FileDialog オブジェクトを取得する（FileDialog プロパティ）
2016/03/09
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」を選択して「開く」をクリック
関連記事
-
-
FileDialogFilters コレクション・FileDialogFilter オブジェクト
FileDialogFilters コレクション FileDialog オブジェ …
-
-
テキストファイル：データを読み込む（Get ステートメント）
Get ステートメント Open ステートメント をランダムアクセスモード（Ra …
-
-
テキストファイル：出力する 1 行の幅を設定（Width # ステートメント）
Width # ステートメント Open ステートメント をシーケンシャル出力モ …
-
-
「ファイルを開く」ダイアログボックス（FindFile メソッド）
FindFile メソッド 「ファイルを開く」ダイアログボックスを表示します。G …
-
-
Excelでテキストファイルを開く（OpenText メソッド）
Excelでテキストファイルを開く OpenText メソッドで、テキストファイ …
-
-
ファイルのタイムスタンプを取得（FileDateTime 関数）
ファイルのタイムスタンプを取得 ファイルのタイムスタンプを取得するには、File …
-
-
「名前を付けて保存」ダイアログボックスを表示（GetSaveAsFilename メソッド）
GetSaveAsFilename メソッド 「名前を付けて保存」ダイアログボッ …
-
-
開いているファイルの現在の読み取り位置または書き込み位置を取得（Seek 関数）
Seek 関数 Open ステートメント で開いたファイル内の現在の読み取り位置 …
-
-
ファイル属性の取得・設定（GetAttr 関数・SetAttr ステートメント）
ファイル属性の取得（GetAttr 関数） ファイルやフォルダ（ディレクトリ）の …
-
-
テキストファイル：データを読み込む（Line Input # ステートメント）
Line Input # ステートメント Open ステートメントをシーケンシャ …