This code you can run to see how the file picker dialog works. If you want to use something like this then think about how exactly you might want the process to work. Then post with an update

Sub RunMe()
'this calls the selectfile function (which shows a dialog for selecting a file) and displays this in a msgbox
Dim myFile As String
myFile = SelectFile
MsgBox myFile
End Sub
Function SelectFile() As String
Dim mF As FileDialog
Set mF = Application.FileDialog(msoFileDialogFilePicker) '
mF.AllowMultiSelect = False
mF.Show
SelectFile = mF.SelectedItems(1)
End Function
Bookmarks