ダイアログボックスで指定したファイルのパスを返す

ダイアログボックスで指定したファイルの絶対パスを取得して返す関数。 使用例 Sub Main() Dim filePath As String filePath = DecideFile() If filePath = "" Then Exit Sub End Sub