Access class module, although should work in Excel with minor modification, that automates zipping files, with parameters for the following:

Properties Methods

Click the download button for ZipCollection.cls.txt... Download Code