
Excel VBAの GetOpenFilenameは、ユーザーにファイルを選択させるためのダイアログボックスを表示し、選択されたファイルのパスを取得するために使用します。具体的な使い方や、注意点やサンプルコードを紹介します。
📌 「これ、自動化できたらラクなのに…」と思ったこと、ありませんか?
実はその作業、Excelマクロで簡単に自動化できるかもしれません。
「でもマクロって難しそう…」という方のために、完全初心者向けの入門記事をご用意しました!
👇実務で“そのまま使える”テンプレ付きで、コピペするだけ!
初心者向けエクセルマクロの作り方を解説|コピペOK実務テンプレ付き
Excel VBA GetOpenFilenameを利用
以下のようなシーンで利用されます。
・Excel VBAでファイルを開いたり、ファイルパスを取得したい場合に使用します。
・ファイルを選択してそのパスを取得したい場合や、特定のファイルを読み込む必要がある場面で使用します。
GetOpenFilename関数は、ユーザーがキャンセルボタンをクリックした場合や、ファイルを選択せずにダイアログを閉じた場合に、Falseを返します。そのため、戻り値を確認して適切に処理する必要があります。
Excel VBA GetOpenFilenameサンプルコード
自分の実力を客観的にチェックしたい…。そんな方のために、自分に合ったスタート地点がわかる無料のExcelVBAベーシック選択問題集をご用意しました。
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で自動化するコードのベースが習得できる解説書」
Excel VBAエキスパートベーシックとスタンダード、どちらを選べばいいか判断が難しい…。そんな方のために、自分に合ったスタート地点がわかる無料のExcelVBAベーシック選択問題集を用意しました。