GetFilePath

Summary

ダイアログからファイルを選択し、選択されたファイルのパスを取得するための関数です。

Function GetFilePath() As String
'ダイアログからファイルを選択し、ファイルパスを取得する

Dim filePath As String

    filePath = Application.GetOpenFilename

    If filePath = "False" Then
        GetFilePath = False
        Exit Function
    Else
    End If

    GetFilePath = filePath
End Function

説明

この関数は、ダイアログを表示してユーザーにファイルの選択を促し、 選択されたファイルのパスを取得するために使用されます。

関数では、Application.GetOpenFilename を使用してファイル選択ダイアログを表示し、 選択されたファイルのパスを filePath 変数に格納します。

選択されたファイルのパスが "False" と等しい場合は、ファイルが選択されなかったことを示し、 戻り値として False を返します。
それ以外の場合は、選択されたファイルのパスを戻り値として返します。

引数

• なし

戻り値

• 戻り値の型: String型 (選択されたファイルのパス)
  • ファイルが選択された場合は、選択されたファイルのパスが返されます。
  • ファイルが選択されなかった場合は、Falseが返されます。

Examples

使用例として、関数 GetFilePath を呼び出してダイアログからファイルを選択し、 選択されたファイルのパスを取得する方法が示されています。 関数の結果は、filePath 変数に格納されます。

' ダイアログからファイルを選択し、ファイルパスを取得する
Dim filePath As String
filePath = GetFilePath()