Error when running macro

[Anmol_happy]

Can anyone help me to solve this syntax of of adding file path to TEXTBOX

This is my UI form

 

[rlv01]

Make sure to use the right name for the textbox object. Find the name by inspecting the property box. I suspect it is "TextBox4" , not "textbox 4". If so then,

        Private Sub CommandButton1_Click()
            Dim a As String
        
            a = Application.GetOpenFilename
            Me.TextBox4.Value = a
        End Sub

 

[Fluff]

As that looks to be a Form Control textbox, try

Sheet1.Shapes("TextBox 4").TextFrame.Characters.Caption = a

 

[Anmol_happy]

Make sure to use the right name for the textbox object. Find the name by inspecting the property box. I suspect it is "TextBox4" , not "textbox 4". If so then,

        Private Sub CommandButton1_Click()
            Dim a As String
       
            a = Application.GetOpenFilename
            Me.TextBox4.Value = a
        End Sub

Thanks but I am getting this error:

 

[Anmol_happy]

i

As that looks to be a Form Control textbox, try

Sheet1.Shapes("TextBox 4").TextFrame.Characters.Caption = a

Thanks Its worked

 

[Fluff]

Glad we could help & thanks for the feedback.