将URL插入TextBox

Question

我有一个在我的TextBox中插入网址的问题。

这是我的代码：

Sub GetOpenFile()

Dim fileStr As String

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

End Sub

我想浏览一个文件，浏览后我希望该文件的名称出现在TextBox中。

Answer 1

我错过了指定一张纸。

Sub GetOpenFile()

Dim fileStr As String

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

End Sub