Excel VBA GetOpenFilenameでダイアログボックス表示選択・パス取得

2024年3月28日 2024年11月16日

Excel VBAの GetOpenFilenameは、ユーザーにファイルを選択させるためのダイアログボックスを表示し、選択されたファイルのパスを取得するために使用します。具体的な使い方や、注意点やサンプルコードを紹介します。

Excel VBA GetOpenFilenameを利用

以下のようなシーンで利用されます。

・Excel VBAでファイルを開いたり、ファイルパスを取得したい場合に使用します。

・ファイルを選択してそのパスを取得したい場合や、特定のファイルを読み込む必要がある場面で使用します。

ポイント

GetOpenFilename関数は、ユーザーがキャンセルボタンをクリックした場合や、ファイルを選択せずにダイアログを閉じた場合に、Falseを返します。そのため、戻り値を確認して適切に処理する必要があります。

Excel VBA GetOpenFilenameサンプルコード

Option Explicit

Sub OpenFile()
    Dim filePath As Variant
    ' ファイルを選択させるダイアログボックスを表示し、選択されたファイルのパスを取得
    filePath = Application.GetOpenFilename()
    ' ファイルが選択された場合は、そのパスをメッセージボックスで表示
    If filePath <> False Then
        MsgBox "選択されたファイルのパスは: " & filePath
    Else
        MsgBox "ファイルが選択されませんでした。"
    End If
End Sub

サンプルコードは、ダイアログボックスを表示、ユーザーがファイルを選択するとそのパスがメッセージボックスで表示されます。

Excel VBAで自動化するコードのベースを習得したい方におすすめ！

VBAエキスパート資格は、日常業務でExcelを多用し、手動作業を減らしたいと考えている方には価値あるものです。

ExcelVBAエキスパートベーシック
仕事の効率をあげるためにExcelVBAを利用する人が対象の問題集です。

Excel VBAベーシック問題集

ExcelVBAエキスパートスタンダード
ExcelVBAの開発を仕事にする人が対象の問題集です。

ExcelVBAスタンダード問題集

Excel VBA エキスパート資格について知りたい方は、下記「Excel VBAスキルアップを目指すなら知っておきたいVBAエキスパート」をご確認ください。