Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


7530 / 13644 ツリー ←次へ | 前へ→

【37071】コマンドボタンでメール送信 ゆみ 06/4/20(木) 20:10 質問[未読]
【37074】Re:コマンドボタンでメール送信 ponpon 06/4/20(木) 20:20 発言[未読]
【37076】Re:コマンドボタンでメール送信 ゆみ 06/4/20(木) 20:40 お礼[未読]
【38529】Re:コマンドボタンでメール送信 H. C. Shinopy 06/6/6(火) 0:01 回答[未読]

【37071】コマンドボタンでメール送信
質問  ゆみ  - 06/4/20(木) 20:10 -

引用なし
パスワード
   初めて投稿します。
よろしくお願いします。
シート上にコマンドボタンを作って クリックしたら
シートを添付ファイルとしてメール送信が出来るようにしたいのです。
コードをどのように書けばよいのか解りません。
よろしくお願いします。

【37074】Re:コマンドボタンでメール送信
発言  ponpon  - 06/4/20(木) 20:20 -

引用なし
パスワード
   こんばんは。

参考になれば、井上さんのページですが

http://www.asahi-net.or.jp/~ef2o-inue/download/sub09_020_050.html

過去ログにも

http://www.vbalab.net/vbaqa/c-board.cgi?word=%83%81%81%5B%83%8B%91%97%90M&way=0&target=all&view=0&id=excel&cmd=src

【37076】Re:コマンドボタンでメール送信
お礼  ゆみ  - 06/4/20(木) 20:40 -

引用なし
パスワード
   早々のお知らせ ありがとうございました。
参考にさせて頂きます。
完成しましたらまた報告させて頂きます。

【38529】Re:コマンドボタンでメール送信
回答  H. C. Shinopy  - 06/6/6(火) 0:01 -

引用なし
パスワード
   御質問から日にちが経っておりますので、
取り敢えず参考までにということで…

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 *----*----*  *----*----*  *----*----*  *----*----*

7530 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free