アクセスから差し込み文書のメール送信の自動化

現在アクセスのデータをワードへの差し込み文書からメール送信しています。
この一連の操作をクリック1回で行う設定は可能でしょうか？

現在の手順は以下のとおりです。

(1)　ワードで作成した差し込み文書を立ち上げる。（差し込み元のアクセスのファイルも同時に起動）
(2)　差し込み文書からメール送信。
(3)　送信を完了したら、アクセスのテーブルにチェックを入れる。

マクロとかVBAを利用してできるものでしょうか？

No.1 ベストアンサー 回答者： how-do-you-do 回答日時： 2003/02/17 14:46

メール送信なら使用しているメールソフトが「OutLook」などなら、

（インターネットオプションで設定できるメールソフト）
DocmdオブジェクトのSendObjectメソッドを使用すればできるのでは？

'マクロ～～～～～～～～～～～～～～～
アクション：オブジェクトの送信

オブジェクトの種類 ＞ レポート
オブジェクト名 ＞ レポート名
出力ファイル形式 ＞ Rich Text Format
宛先 ＞ メルアド
Cc ＞
Bcc ＞
件名 ＞ サブジェクト
メッセージ ＞ HELLO!!
'～～～～～～～～～～～～～～～

'VBA～～～～～～～～～～～～～～～
stTO = "メルアド"
stCC = ""
stBCC = ""
stSubject = "サブジェクト"
stMessage = "HELLO!!"
stSendObj = "レポート名"

DoCmd.SendObject acSendReport, stRptName, acFormatRTF, stTO, stCC, stBCC, stSubject, stMessage, True
'～～～～～～～～～～～～～～～

あとの細かい部分がVBAでできますね

参考程度に...

この回答へのお礼

ためしてみたらうまくいきました。ありがとうございました。

お礼日時：2003/05/17 09:38