VBAツール:【Excel】複数ファイルーファイル毎一括圧縮ツール(Windows標準 zip圧縮)


  • 複数ファイルを一度にZipで圧縮したいけど、ファイル単位で圧縮ファイルを作りたい。
  • そのために複数ファイルを一つずづ選んで圧縮するのがめんどくさい
  • 会社のPCなので圧縮ソフトをインストールできないので、Windows標準のzipでどうにかしたい
  • 会社のPCの場合、Windows標準以外の圧縮ソフトをインストールできない場合があります。
    その場合、たくさんのファイルをファイルごとに圧縮しなければいけないという作業時に、一つずつ選択し、圧縮しなければならず時間と忍耐がかかります。
    そんな時に役立つツールをひとまずExcelで作りました。

    ◆複数ファイルーファイル毎一括圧縮ツール

     Excelの見た目はこんな感じでシンプルです。
     複数のファイルを選択すると、ファイルごとに圧縮ファイルが作成されます。
     内容的にVBScriptにした方がいい気もしますが、ひとまずExcelで作りました。

    【使い方】

    (1)「圧縮実行」ボタンを押す
    (2)ダイアログが開くので、圧縮したいファイルを選択(複数も可能)
    (3)別のダイアログが開くので、保存先のフォルダを選択
    (4)ファイル毎に圧縮が終わると「完了」と出ます。



    サンプルコード


    おすすめ