When inserting a hyperlink in VB how do I make it open the Hyperlink Dialog pop up so that the user then can select any file from any location

The code I have at the moment goes like the following

ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=strFileNam

I could use an input box to get the file name from the user but if it is not in the current directory then they will have to type in the directory path as well which leaves to much room for error.