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

 

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

 

📌 「これ、自動化できたらラクなのに…」と思ったこと、ありませんか?
実はその作業、Excelマクロで簡単に自動化できるかもしれません。
「でもマクロって難しそう…」という方のために、完全初心者向けの入門記事をご用意しました!

👇実務で“そのまま使える”テンプレ付きで、コピペするだけ
初心者向けエクセルマクロの作り方を解説|コピペOK実務テンプレ付き

 

Excel VBA GetOpenFilenameを利用

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

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

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

 

ポイント

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

 

Excel VBA GetOpenFilenameサンプルコード

 

自分の実力を客観的にチェックしたい…。そんな方のために、自分に合ったスタート地点がわかる無料のExcelVBAベーシック選択問題集をご用意しました。

👉無料ExcelVBAベーシック選択問題138問

 

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エキスパートベーシックとスタンダード、どちらを選べばいいか判断が難しい…。そんな方のために、自分に合ったスタート地点がわかる無料のExcelVBAベーシック選択問題集を用意しました。

👉無料ExcelVBAベーシック選択問題138問