从VBA使用7-zip命令行

Question

运行宏的结果是，我有一个文件夹，其中包含各种文件类型：.err，.txt，.sh，.fat ..

例如，如果我希望该宏仅压缩.fat文件，则效果很好：

ShellStr = PathZipProgram & "7z.exe a " & " " & Chr(34) & NameZipFile & Chr(34) & " " & Chr(34) & FolderName & Chr(34) & "*.fat"

在哪里（我正在尝试尽可能保持整洁）：

1. PathZipProgram-> 7zip目录
2. NameZipFile-> Output.zip文件
3. FolderName-> Input.zip文件

相反，如果我只想阅读7-zip命令行手册中的某些文件（例如，仅* .fat和* .sh），则似乎是：

ShellStr = PathZipProgram & "7z.exe a " & " " & Chr(34) & NameZipFile & Chr(34) & " " & Chr(34) & FolderName & Chr(34) & "*.fat -i*.sh"

应该也可以，但是不能。 有更多经验的人可以帮我解决这个问题吗？

Answer 1

您可能会在7-Zip命令行语法中找到：

7z <command> [<switch>...] <base_archive_name> [<arguments>...]

<arguments> ::= <switch> | <wildcard> | <filename> | <list_file>

因此，您只需要重复您的源内容：

ShellStr = PathZipProgram & "7z.exe a """ & NameZipFile & """ """ & FolderName & "\*.fat"" """ & FolderName & "\*.sh"""

提示：可以将字符串加倍后转义引号。