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

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

[ 最新記事及び返信フォームをトピックトップへ ]

■13588 / inTopicNo.1) 　Excel VBA 全シートの画像(図？)を全て選択してJPG等の別形式に変更
  ▼■
□投稿者/ 事務補助 -(2023/01/31(Tue) 16:24:40)
    仕事の関係で月に一度、複数のシートに大量の画像が添付されたExcelファイルを整理することがあるのですが、
    提出者全員添付している画像の形式がバラバラでファイルサイズの軽量化に非常に時間がかかっています。
    ごく稀に100以上のシートを整理することがあり、時間が割かれて仕方がありません。

    選択したシートの画像を全て選択してJPGに変換するマクロをコピペして、
    シートを一つずつ処理しているのですが、
    全シート版のマクロは他サイトを探しても見つからず・・。
    教えてください。
引用返信/返信 削除キー/
■13589 / inTopicNo.2) 　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

引用返信/返信 削除キー/
■13590 / inTopicNo.3) 　Re[2]: Excel VBA 全シートの画像(図？)を全て選択してJPG等の別形式に変更
□投稿者/ 事務補助 -(2023/02/02(Thu) 16:14:29)
    お教えいただいたコードでうまく行きました！
    ありがとうございます！
引用返信/返信 削除キー/


トピック内ページ移動 / << 0 >>

このトピックに書きこむ
Pass/

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

- Child Tree -