よねさんのWordとExcelの小部屋　なんでも掲示板 [One Tree All Message]

よねさんのWordとExcelの小部屋　なんでも掲示板

ツリー一括表示
Excel VBA 全シートの画像(図？)を全て選.. /事務補助 (23/01/31(Tue) 16:24) #13588
`└` Re[1]: Excel VBA 全シートの画像(図？)�.. /よねさん (23/01/31(Tue) 16:55) #13589
`└` Re[2]: Excel VBA 全シートの画像(図？)�.. /事務補助 (23/02/02(Thu) 16:14) #13590

親記事　/ ▼[ 13589 ]

■13588 / 親階層)

　Excel VBA 全シートの画像(図？)を全て選択してJPG等の別形式に変更

□投稿者/ 事務補助 -(2023/01/31(Tue) 16:24:40)

仕事の関係で月に一度、複数のシートに大量の画像が添付されたExcelファイルを整理することがあるのですが、
提出者全員添付している画像の形式がバラバラでファイルサイズの軽量化に非常に時間がかかっています。
ごく稀に100以上のシートを整理することがあり、時間が割かれて仕方がありません。

選択したシートの画像を全て選択してJPGに変換するマクロをコピペして、
シートを一つずつ処理しているのですが、
全シート版のマクロは他サイトを探しても見つからず・・。
教えてください。

[ □ Tree ] 返信/引用返信 削除キー/

▲[ 13588 ] / ▼[ 13590 ]

■13589 / 1階層)

　Re[1]: Excel VBA 全シートの画像(図？)を全て選択してJPG等の別形式に変更

□投稿者/ よねさん -(2023/01/31(Tue) 16:55:32)

まったく同じ処理のコードはなかなかないと思います。
Webで「Excel　全てのシートを処理する」と調べたところ
よそ様のサイトですが下のようなものが見つかります。
一つのシートで今使っているコードを処理内容のところに入れるとうまくいくかもしれません。

ブック内のすべてのワークシートで同じ処理を行う 《For Each～Next》
https://www.helpforest.com/excel/emv_sample/ex100001.htm

Dim Ws As Worksheet
For Each Ws In Worksheets
	Ws.Activate
	処理内容
Next Ws

[ 親 13588 / □ Tree ] 返信/引用返信 削除キー/

▲[ 13589 ] / 返信無し

■13590 / 2階層)

　Re[2]: Excel VBA 全シートの画像(図？)を全て選択してJPG等の別形式に変更

□投稿者/ 事務補助 -(2023/02/02(Thu) 16:14:29)

お教えいただいたコードでうまく行きました！
ありがとうございます！

[ 親 13588 / □ Tree ] 返信/引用返信 削除キー/

HOME HELP 新規作成新着記事ツリー表示トピック表示検索過去ログ

- Child Tree -