疑問・質問・マクロの要望

このブログでは Outlook に関する質問や疑問、マクロの要望などを募集しています。
この記事のコメントに入力してご質問等をお寄せください。(コメントに入力される際には、他の質問と区別できるよう、できる限り名前の欄にハンドル名などを入れてくださると助かります。)
また、ご質問に Outlook のバージョンや使用環境の詳細を記載していただくと、より的確な回答が可能になると思いますので、ご協力をお願いします。

なお、可能な限りお答えしたいと思いますが、すべてのコメントやメッセージにお答えできるとは限りません。特に、ログやデータの解析が必要なトラブルに対するご質問や、複雑なマクロのご要望などにはお答えできない場合があります。
確実に回答が必要な場合や、差し迫ったトラブルへの対応、製品の恒久的な対応やマイクロソフト社の正式見解が必要な場合は、マイクロソフトのサポート窓口にお問い合わせください。

広告

疑問・質問・マクロの要望」への1件のフィードバック

  1. いつも勉強させていただいております。
    過去記事を参考にさせていただきマクロ作成を試しているのですが、
    VBAについて理解が浅いためかうまく作成することができず、
    お力をお貸しいただけないでしょうか。

    ■利用環境
    OSバージョン:Windows7 SP1 & Windows10 RD2
    Outlookバージョン:Outlook2010

    ■参考にした過去記事
    ・メールの内容を Excel ファイルにかき出すマクロ
    ・本文から取得したデータを項目別に Excel のシートに書き出すマクロ
    ・決まった件名で終わるメッセージを受信したら、キーワードを含む 1 行を CSV ファイルに保存するマクロ
    ・Outlook 起動時に受信後 14 日が経過しているメールを受信トレイから移動するマクロ

    ■前提
    顧客のデータベースの内容が変更されると、翌日にシステムからメールが送られてきます。
    会社名や管理番号以外は変更があった箇所のみ以下のメール本文例のように記載されます。
    ([項目名]は固定値で変更がない場合はメールには記載されない。)

    該当の[項目名]の後ろ何文字~何文字をエクセルに転記という形を目指してみましたが、
    間に「改行コード、半角スペース、任意の文字列(メールによって文字数は変動)」が
    記載された行が含まれる事が要因かと思うのですが、全角と半角カナ英数字のときで
    取得される位置が変わってしまい、よくわからなくなってしまいました。

    ◎実現したいこと
    (1)指定フォルダ内のすべてのメールの本文内の特定の内容をエクセルに書き出したい。
      ※特定の内容は「変更後:」以降の文字列。(下記メール本文例を参照)
       「変更前:~(任意の文字列)」の行は転記はせずに飛ばしたい。
      ※メール本文内の[項目名]の前には半角スペース4つ、[変更前:][変更後:]の前には
       半角スペースが6つ記載されています。

    (2)上記の処理がすべて完了後に該当フォルダのサブフォルダへ移動させたい。

    ●メール本文例1(※書き出し先のエクセル表のイメージの行4のように転記したい)
    ============================================================
    会社名 :■■■ 株式会社 
    管理番号 :0000000003

    変更点 :
    2019/01/15
    郵便番号
    変更前:444-5555
    変更後:333-3333

    住所
    変更前:■■県■■市4-5 ■■ビル5F
    変更後:■■県■■市3-3-3 ■■ビル3F

    ============================================================

    ●メール本文例2(※書き出し先のエクセル表のイメージの行5のように転記したい)
    ============================================================
    会社名 :○○○ 相互会社 
    管理番号 :0000000004

    変更点 :
    2019/01/15
    部署名
    変更前:第一製造部 
    変更後:第三製造部 

    部署名カナ
    変更前:ダイイチセイゾウブ
    変更後:ダイサンセイゾウブ

    ============================================================

    ◎書き出し先のエクセル表のイメージ

    \A列 \B列 \C列 \D列 \E列 \F列 \
    行1\①会社名 \②管理番号 \③部署名 \④部署名カナ \⑤郵便番号 \⑥住所 \
    行2\●●● 株式会社 \0000000001 \管理本部 \カンリホンブ \111-1111 \●●市●●町1-1 ●●ビル4階 \
    行3\□□□ 有限会社 \0000000002 \第一営業部 \ダイイチエイギョウブ \222-2222 \□□郡□□2-2-2 □□ビル2F \
    行4\■■■ 株式会社 \0000000003 \ \ \333-3333 \■■市3-3-3 ■■ ビル3F \
    行5\○○○ 相互会社 \0000000004 \第三製造部 \ダイサンセイゾウブ \ \ \

    ※各項目内の文字列についての補足(※具体例は書き出し先のエクセル表のイメージの行2、行3)
    ①会社名:全角
    ②管理番号:半角英数字
    ③部署名:全角
    ④部署名カナ:半角カナ
    ⑤郵便番号:半角英数字
    ⑥住所:全角、半角カナ英数字が混在 ※

    ※書き出し先のエクセル表のイメージ行1の項目は一例で、実際にはさらに数が多くなります。

    お手数おかけして大変申し訳ございませんが、
    何卒よろしくお願いいたします。

コメントを残す

以下に詳細を記入するか、アイコンをクリックしてログインしてください。

WordPress.com ロゴ

WordPress.com アカウントを使ってコメントしています。 ログアウト /  変更 )

Google+ フォト

Google+ アカウントを使ってコメントしています。 ログアウト /  変更 )

Twitter 画像

Twitter アカウントを使ってコメントしています。 ログアウト /  変更 )

Facebook の写真

Facebook アカウントを使ってコメントしています。 ログアウト /  変更 )

%s と連携中