0

ローカルに保存しているmsgファイルから情報を取得したく

考えています。

初心者なのですが、下記の通り簡単なスクリプトを自作

してみました。

すると、このようなエラーが出ます。構文エラーだと思います。

スクリプトの実行に失敗しました。
エラー番号: 0x00000401
内容: ステートメントの末尾が不正です。

作成したスクリプトは以下です。

(こちらのサイトを参考に作成してみました。初心者ですいません。。。)

Outlookメッセージファイル(.msg)からデータを取り出す – VBA

Dim OL oObject
Dim msg oObject

Set OL = CreateObject("Outlook.Application")

strFileName = !ファイルパス!

Set msg = OL.CreateItemFromTemplate(strFileName)

msg.SenderName = !差出人!
msg.CC = !CC!
msg.Subject = !件名!

Set msg = Nothing
Set OL = Nothing

エミュレーションを使っても良いのですが、「Ctrl+A」だと送信者やCCの

情報を選択できませんでした。「tab」キーも反応しませんでした。

イメージ的に、ファイル内のCCやSenderNameの要素の情報を取り出せば、

すぐに処理できると思っていたのですが、難しいのでしょうか??

大変申し訳ございませんが、有識者の方からご連絡いただけますと幸いです。

なにとぞよろしくお願いいたします。

この質問は解決済みのためクローズされています。
kitayama ベストアンサーとして選択しました
回答とコメントは、会員登録(無料)で閲覧できるようになります。