This seems to works too

const TheFolderPath = "\\Anywhere"
Application.GetOpenFilename(filefilter:="Excel Files (*.xls)," &
TheFolderPath & "\*.xls")

"WCR" wrote:

Can you specify the start location for the getopenfilename dialog box?

Dim f As String
f = Excel.Application.GetOpenFilename("LIS Files (*.lis), *.lis")

I would like to start the search in a specific location, instead of "My
Documents". Couldn't find any info on this topic yet.

Thanks!