VBAでパスワードつきZIP圧縮について

次のURLを使わせていただいてVBAでZIP圧縮できました。 http://scripting.cocolog-nifty.com/blog/2007/11/vbazip_a144.html さらに、VBAからパスワードつきでZIP圧縮したいのですがどのようにしたらいいでしょうか？ VBAはExcel2013VBAです。