「ファイルを開く」ダイアログボックス（FindFile メソッド）
FindFile メソッド
「ファイルを開く」ダイアログボックスを表示します。GetOpenFilename メソッド とは異なり、選択したファイルを実際に開きます。
【書式】
object.FindFile
引数・戻り値
- object ・・・ 対象となる Application オブジェクトを指定します。
- 戻り値 ・・・ 選択したファイルを正常に開くことができた場合は、True が返されます。ダイアログボックスをキャンセルした場合は、False が返されます。
FindFile メソッド 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 |
Sub Sample_FindFile() If Application.FindFile = False Then MsgBox "キャンセルしました。" End Sub |
実行結果
ファイルを選択
存在しないファイルを選択して「開く」をクリックした場合
「キャンセル」をクリックした場合
関連記事
-
-
特殊フォルダを取得（wsh.SpecialFolders）
CreateObject 関数：特殊フォルダを取得（WSH.SpecialFol …
-
-
開いているファイルの現在の読み取り位置または書き込み位置を取得（Seek 関数）
Seek 関数 Open ステートメント で開いたファイル内の現在の読み取り位置 …
-
-
テキストファイル：データを読み込む（Input # ステートメント）
Input # ステートメント Open ステートメント をシーケンシャル入力モ …
-
-
ファイルサイズを取得（FileLen 関数）
ファイルサイズを取得 ファイルのサイズ（バイト数）を取得するには、FileLen …
-
-
テキストファイル：データを書き込む（Write # ステートメント）
Write # ステートメント Open ステートメント をシーケンシャル出力モ …
-
-
「名前を付けて保存」ダイアログボックスを表示（GetSaveAsFilename メソッド）
GetSaveAsFilename メソッド 「名前を付けて保存」ダイアログボッ …
-
-
Excel を終了する（Quit メソッド）
Excel を終了する（Quit メソッド） Quit メソッドを実行すると、E …
-
-
テキストファイル：データを書き込む（Print # ステートメント）
Print # ステートメント Open ステートメント をシーケンシャル出力モ …
-
-
テキストファイル：出力する 1 行の幅を設定（Width # ステートメント）
Width # ステートメント Open ステートメント をシーケンシャル出力モ …
-
-
Excel の組み込みダイアログボックス（Dialog, Dialogs）
Excel の組み込みダイアログボックスを表示 Dialog オブジェクト を使 …