【ExcelVBA】 ファイル名を取得するダイアログを表示する

ExcelVBAでファイルのフルパスを取得するマクロを紹介します。

Dim fileName As String
fileName = Application.GEtOpenFilename("Microsoft Excelブック,*.xls?")

MsgBox fileName

後は選択したファイルを開くなり煮るなり焼くなりしてくださいね。

以上になります。