I don't remember exactly what my problem was but I recall something with the OWC.dll causing me problems so I went to something more like:
Code:
Dim fdo
Set fdo = Application.FileDialog(3)
With fdo
.Title = "Select a file to import"
'looks up default starting location for import files
.InitialFileName = DLookup("[ImportLocation]", "tblLocations")
.filters.Clear
'adds only excel file to default search parameter
.filters.Add "Excel Files", "*.xls*"
.Show
'hands the selected file/folder information to fldFile
fldFile = .SelectedItems.Item(1)
End With
it was more generic and didn't require me to change my references and seems to work (so far) across ms access platforms for me (haven't had occasion to go back to 2003/XP if that's still an issue for you)