|
御質問から日にちが経っておりますので、
取り敢えず参考までにということで…
Sub MyDialogSendMail()
Rem *----*----* *----*----* *----*----* *----*----*
Rem 電子メール送信準備処理
Rem 機能...
Rem 開いているブックを添付ファイルとして、
Rem 決まった宛先・件名で、電子メールを送信する準備をする。
Rem 注記...
Rem 1. メニューバーの[ファイル]をクリックし、[送信]を選択して、メールを送信する。
Rem 2. Microsoft Outlookを起動して、メールの新規作成で、
Rem メニューバーの[表示]をクリックし、[ツールバー...]を選択し、
Rem [標準]チェックボックスをオンにしておくと、
Rem この処理で[送信]コマンドボタンが表示され、手作業による送信がやりやすくなる。
Rem 履歴...
Rem 第1版:2006/06/03:作成。
Rem *----*----* *----*----* *----*----* *----*----*
Call Application.Dialogs(xlDialogSendMail).Show("xxxxx@xxxx.com", "Test!")
End Sub ' MyDialogSendMail *----*----* *----*----* *----*----* *----*----*
|
|