Adjust this line as needed
Application.GetOpenFilename(filefilter:="Excel Files (*.xls), *.xls", _
or delete filefilter:="Excel Files (*.xls), *.xls", _ to select all files
--
-John
Please rate when your question is answered to help us and others know what
is helpful.


"Jim Jackson" wrote:

I visited http://www.rondebruin.nl/windowsxpzip.htm and found great help
there.

Is there a way to specify the file type(s) to be Zipped? (All Excel files
or all Word files, etc.)

Thanks,
--
Best wishes,

Jim