nichtanzeige von zip aus access heraus

wir arbeiten mit access-datenbanken;
bei der suche über das file-system aus access heraus werden alle dateien außer *.zip angezeigt;
das access_problem liegt beim befehl ".Execute" im programmcode, der die zips nicht erkennt:

.LookIn = Pfad
.FileType = msoFileTypeAllFiles
.FileName = "*" & Name & "*"
If .Execute(SortBy:=msoSortByFileName, SortOrder:=msoSortOrderAscending) > 0 _
And .LookIn = Pfad Then
For i = 1 To .FoundFiles.Count
...
gibt es eine möglichkeit, aus access heraus auch *.zip zur anzeige zu bringen?