Excel VBA質問箱 IV

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

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


56447 / 76737 ←次へ | 前へ→

【25043】Re:メールに他のファイルを添付する方法
発言  kazu  - 05/5/18(水) 18:29 -

引用なし
パスワード
   ▼ばもばも さん:

メールを作って本文書いて添付ファイル付けてあて先、CCを入れ、表示する。

この一連の流れなら以下で出来ませんでしょうか。

はずしてたらすみません・・・。

Set objolApp = CreateObject("Outlook.Application")
Set objMail = objolApp.createitem(0)
With objMail
  .Subject = "件名"
  .body = "本文"
  .Attachments.Add "添付ファイルをフルパスで"

  Set myRecipient = .Recipients.Add("あて先のメールアドレス")

  Set myRecipient = .Recipients.Add("CCのメールアドレス")
  myRecipient.Type = 2
  .display
End With

Set objMail = Nothing
Set objolApp = Nothing
  

0 hits

【25027】メールに他のファイルを添付する方法 ばもばも 05/5/18(水) 10:29 質問
【25043】Re:メールに他のファイルを添付する方法 kazu 05/5/18(水) 18:29 発言
【25077】Re:メールに他のファイルを添付する方法 ばもばも 05/5/19(木) 13:51 お礼
【25092】Re:メールに他のファイルを添付する方法 かみちゃん 05/5/20(金) 0:15 回答
【25095】Re:メールに他のファイルを添付する方法 ばもばも 05/5/20(金) 9:37 質問
【25109】Re:メールに他のファイルを添付する方法 かみちゃん 05/5/20(金) 12:52 発言
【25250】Re:メールに他のファイルを添付する方法 ばもばも 05/5/25(水) 11:44 お礼

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