質問編集履歴

1

自己解決を半分したところでエラーが発生したため、追加記載しました

2018/12/07 03:45

投稿

taka_
taka_

スコア10

test CHANGED
File without changes
test CHANGED
@@ -53,3 +53,43 @@
53
53
  英語のサイトなど調べたのですがうまく見つかりませんでした
54
54
 
55
55
  ご教授どうぞよろしくお願いいたします
56
+
57
+
58
+
59
+
60
+
61
+ ↓ 
62
+
63
+
64
+
65
+ papinianus様のアドバイスにより
66
+
67
+ Shell ("C:\Program Files\WinZip\WINZIP64.EXE -min -a -r -s" & Password & " " & Target & " " & Source)とすることで解決しましたが、以下のようなエラーメッセージが出るようになりました。なお、圧縮時の作業を待つためのWindowsのAPIを利用しています。
68
+
69
+ 圧縮ファイル自体は正しく作成されているので問題はないように見えるのですが、エラーメッセージが出ないほうがきれいなので気になります。
70
+
71
+ よろしくお願いします。
72
+
73
+
74
+
75
+ Action: Add (and replace) files
76
+
77
+ Include subfolders: yes
78
+
79
+ Save full path: no
80
+
81
+ Adding 02POWER WORD.pptx
82
+
83
+ Adding 03POWER WORD.pptx
84
+
85
+ Adding Bkup\
86
+
87
+ Adding Bkup\SecurePDFFiles from PPT_01.xlsmThe following file is open by another program. If that program
88
+
89
+ writes to the file while WinZip is zipping the file, the zipped
90
+
91
+ file may be corrupt: "P:\My Documents\Macro\パワポのPDF化\SecurePDFFiles from PPT_04.xlsm".
92
+
93
+ Adding 結果\
94
+
95
+ Total bytes=98371650, Compressed=24560041 -> 75 percent savings.