Power Automate Desktopで複数フォルダを一気に圧縮
みなさん、こんにちは。
紙、印鑑、手作業に埋もれて業務をしている昭和男子の会社員です。
毎月、請求書を大量に発行し、メール送信している業務を行っています。
前回、請求書のExcelファイルをメールに添付し間違えないように取引先ごとにExcelファイルを仕分けしました。
複数のファイルをいちいちメール添付するのが手間だし、容量も大きくなります。
そこで仕分けしたフォルダをPowerAutomateDesktopで一気に圧縮しました。
使用するもの
・Power Automate Desktop
Power Automate Desktopの設定
フローのソースコード
複数フォルダを一気に圧縮
Folder.GetSubfolders Folder: $'''\\\\mvssmain\\共有\\05_商品\\専用\\11_契約関連\\02_リベート契約\\2023年度\\割り戻し計算確認書自動作成用\\メール送信用フォルダ作成''' FolderFilter: $'''*''' IncludeSubfolders: False FailOnAccessDenied: True SortBy1: Folder.SortBy.NoSort SortDescending1: False SortBy2: Folder.SortBy.NoSort SortDescending2: False SortBy3: Folder.SortBy.NoSort SortDescending3: False Subfolders=> Folders
LOOP FOREACH CurrentItem IN Folders
SET NewVar TO CurrentItem.Name
Compression.ZipFiles ArchivePath: $'''\\\\mvssmain\\共有\\05_商品\\専用\\11_契約関連\\02_リベート契約\\2023年度\\割り戻し計算確認書自動作成用\\メール送信用フォルダ作成\\%NewVar%.zip''' FilesOrFoldersToZip: $'''\\\\mvssmain\\共有\\05_商品\\専用\\11_契約関連\\02_リベート契約\\2023年度\\割り戻し計算確認書自動作成用\\メール送信用フォルダ作成\\%NewVar%''' CompressionLevel: Compression.CompressionLevel.BestBalanceOfSpeedAndCompression ArchiveComment: $'''''' ZipFile=> ZipFile
END
メール添付が楽に
メールの自動送信をしたくて、添付ファイルをフォルダ毎にまとめることにし、フォルダを圧縮したのですが、自動メール送信が出来ていない状態の今でも、添付間違いも発生しにくいし、添付作業が一回で済むので楽になりました。
自動メール送信にまた一歩近づきましたが、一部の取引先様から、「文字化けする」との連絡が・・・
「文字化け」の課題がありますが、現時点でもミスの減少、作業軽減に繋がっています。
実際にメール送信しているパートさんからも「楽になった」喜んでいただいています。
簡単な割に、意外と効果がありますよ~。ぜひ、使ってみてくださいね