Placing file name in textbox

[RZoig]

Hello.

I have an Excel sheet named DATA and a text button with the word "TEST".

I want to assign a macro to that text button that opens a open file dialog, collect the the file name and replace the word "TEST" with the file name.

I've tried this:

Sub TextBox4_Click()​

​

Dim sFileName As String​

Dim TextBox4 As TextBox​

​

sFileName = Application.GetOpenFilename("MS Excel (*.xlsx), *.xls")​

​

TextBox4.Text = sFileName​

​

End Sub​

It doesn't work.
I'm able to collect the file but then it returns
"Run time error '91'
Object variable or with BLock not set"

The error is here:

TextBox4.Text = sFileName​

What am I missing?

THX!
Rui

 

[RZoig]

Hello.

The error is here:

TextBox4.Text = sFileName​

What am I missing?

Should this Textbox4 be a form textbox?

I used the text box available at the insert tab...

Is that it?

 

[RZoig]

Hello once again.

Just pushing this post forward. See if anyone answers.

I didn't find what's wrong yet.

Thanks!
R

 

[RZoig]

Hello everyone!

Anybody to help?

THX!
R

 

[Dryver14]

Is this in the code for a userform as I don't think there is a textbox click

 

[RZoig]

That's my doubt. This is suppose to work with a userform only?