如何在vba中解压缩zip文件?

如何在vba中调用winrar软件对文件进行解压缩?一文中我们介绍了调用winrar软件进行文件解压缩的方法。

本文介绍一种不需要调用压缩软件进行zip文件的解压缩的方法。

使用shell Folder 对象的CopyHere方法,它的语法如下:

其中vItem参数可以是一个文件的完整路径,也可以是一个FolderItem对象,或者FolderItems集合对象。

特别要注意的是vItem参数一定要以Variant 类型传入,否则会没有任何响应。

vOptions参数可以设置一些显示模式,比如设置为4,在解压缩zip文件时不会显示进度条。设置为16,如果弹出对话框将默认全选是。

以下是一个解压缩指定zip文件的代码:





       

发表评论