UWSC辞典

[ファイルを開く]タイアログボックスを表示します。[開く]でファイルが正常に開かれるとTrue、[キャンセル]をするとFalseが返ります。

構文

Boolean = Application.FindFile

引数

戻値

True

ファイルを正しく開けた

False

ファイルを正しく開けなかった

DIM Excel = CREATEOLEOBJ("Excel.Application")
Excel.Visible = TRUE

IFB Excel.Application.FindFile = TRUE THEN
	MSGBOX("ファイルは正しく開かれました")
ELSE
	MSGBOX("ファイルを正しく開けませんでした")
ENDIF

参考文献

• FindFile メソッド (Excel) | Microsoft Docs
• Office TANAKA – Excel VBA Tips[3種類の[ファイルを開く]ダイアログボックス]