Outlookのメール本文に貼り付けられた画像を一括で取り出す方法

ブログ初の記事です。こういうのは苦手というか、どうやったらよいかわかんないので手探り状態です。
よくわからないので、まず書きたいことを書いてみるという思いです。
アドバイスいただければ嬉しいです。
ではタイトル記事に行きます。

 社内からの問い合わせてOutlookの本文中に貼り付けられた画像を一括で取り出したいとの要望がありました。
どういう状況かというと。。。
f:id:si_n_ma:20200508101350j:plain
こんな感じですね。写真一枚づつ右クリックしていけばいいのですが複数のメールがあり、画像枚数は200枚以上あるとのこと
さっそくググってみましたが、いくつか方法があるものの実際には、社内環境ではうまくいきませんでした。
 いろいろ試行錯誤してこの方法だとほとんどの環境で取り出せるのでは?と思える方法を思いつきました。
箇条書きにしてみますね。

1.該当メールを開きます。
2.左上の「ファイル」から名前を付けて保存を選び、ファイル形式を「html形式」で
 任意の場所に保存します。
3.EXCELを新規で立ち上げ、2.で保存したHTMLファイルを開きます。
 (ファイル形式をすべてのファイルにすることでHTMLファイルをエクセルで開くことができます。)
4.無事開けたら、これをちゃんとXLSX形式で任意の場所に保存してEXCELを終了します。
5.EXCELを保存したフォルダを開きアイコンの拡張子を「ZIP」に手で修正します。
6.ZIPファイルを解凍するとフォルダができます、このフォルダの中に
 「 xl 」があり、その中にさらに「 media 」というフォルダがありますので、ここに画像ファイルとして保存されています。
 (バージョンによってはフォルダ名が違うかもしれませんがどこかにあります。)

EXCELじゃなくて、Wordでもいけるようです。VBAで画像の一括取り出しみたいなのを作っていれば、手順はグッと短縮できますね。

ちなみに、なぜこんなことが起こったかといいますと、
一部社員が出張先でiPhoneで写真を撮って、帰社後PCにつなげて転送してたようですが、そもそも、社内ルールで
PCとiPhoneをケーブル接続しちゃいけませんってのがあって、今更気づいたのだとか、、、でも帰社後だったので撮り直しも出来ないし。。。
ってことでメールで送ったはいいものの(iPhoneとPC間のメールはOKらしい)受信後に困っちゃったということでした。
もうちょっと環境を整えてあげると、出張先で写真撮影→すぐメール→社内の人間がJPG取り出し
という感じで迅速化できるかもしれないですね。


こんな感じで不定期に忘備録と勉強ログを上げていけたらいいなと思います。
(三日坊主のため自信なし。。。)

助かった~って思っていただければコメントお願いします。