インストール不要でフォルダをzipに圧縮するスクリプト。 なお、サブフォルダには対応していない。 '圧縮するフォルダ SorceFolder = "P:\hoge" 'zipの作成先 DestZipPath = "P:\hoge.zip" wkArray = Array(80, 75, 5, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, …