vba - テキストボックスにURLを挿入します

Question

TextBoxにURLを挿入するのに問題があります。

ここに私のコード：

Sub GetOpenFile()

Dim fileStr As String

fileStr = Application.GetOpenFilename()
TextBox1.Text = fileStr

End Sub

ファイルを参照したいのですが、参照した後、そのファイルの名前をテキストボックスに表示したいと思います。

Answer 1

シートの指定を怠りました。

Sub GetOpenFile()

Dim fileStr As String

fileStr = Application.GetOpenFilename()
Worksheets("Sheet2").TextBox1.Value = fileStr

End Sub