VBA - File Dialog Show Result in Textbox on userform

[drluke]

I cannot find how to change this code so that the file path of the selected files are place in an existing text box (TextBox3) in my userform.

Here is the code I'm using

Private Sub CommandButton1_Click()
Dim fDialog As FileDialog, i As Integer
Set fDialog = Application.FileDialog(msoFileDialogFilePicker)
fDialog.AllowMultiSelect = True
fDialog.Title = "Select Files"
fDialog.InitialFileName = "T:\Finance\SohoMaccs\2018Maccs\Monthly Reports\"
fDialog.Filters.Add "Excel files", "*.xlsx"
If fDialog.Show = -1 Then
    For Each it In fDialog.SelectedItems
    Debug.Print it
    Next it
End If

End Sub

The above code works until files are selected. Thereafter nothing happens.

 

[Fluff]

Why have you removed the code from the button_click & out it into a normal module?
If you put it back into the click event as shown by DanteAmor then it should work.

Also, for future reference, if you post code to the site & then change it without our knowledge, you really need to let us know.

 

[drluke]

Thank you all - your help is much appreciated.

 

[Fluff]

You're welcome

 

[DanteAmor]

The last:

UserForm1.TextBox3.Value = Left(fDialog.SelectedItems(1), n)