申し込みメールを表に変換するマクロ

セミナーの申込みなどを、フォームメールで受信した後で一覧表にするのって大変ですよね。
１項目づつコピペしてもいいんですが、大量だと気が遠くなります。
メール本文の項目は通常、１項目ごとに「項目名:内容」で複数行になっていると思います。
この本文をまとめてエクセルのシートにコピペ（１件１列）した後で、タイトルと内容を一覧表にするエクセルを作ってみました。

1. メール本文（「項目名:内容」の部分）を「元データ」シートにコピーする。
   ２件目移行は列を変えてコピーします。データ位置が同じになるようにしてください。
2. 「名簿」シート上で、「データ転記」マクロを実行します。
   「名簿」シートのクリアは入れていません。
   「元データ」シートの１行目が空欄でマクロがストップします。

FormMail_to_Sheet.xlsm

このエクセルは自己責任で使用してください。