[ 初めての方へ | 一覧(最新更新順) | 新規登録 | 全文検索 | 過去ログ ]
『列に名前入れて新規メール立ち上げマクロ』(明日雨)
シート名 宛先
B3からB40
D3からD40
F3からF40
にアウトルックに登録している名前を記入してます
B列に対してA列に
D列に対してC列に
F列に対してE列に
宛先 もしくはCCと記入してます。
宛先に設定されている人は宛先にCCと設定されている人はCCになるように
新規メールが立ち上がるマクロが欲しいです
アウトルックは2013もしくは2010です
何か良いマクロ教えて貰えないですか
< 使用 Excel:Excel2013、使用 OS:Windows8 >
作りたいのではなく欲しいだけですか? (くれくれ君) 2016/07/12(火) 21:26
(明日雨) 2016/07/12(火) 21:49
↓は参考にならないだろうか。
[[20130731144645]] 『メール作成について』(あん)
Mookさんがリンクされてるところも参考に。 (くれくれ君) 2016/07/12(火) 22:26
(明日雨) 2016/07/13(水) 22:11
(明日雨) 2016/07/21(木) 23:17
(とおりすがり) 2016/07/22(金) 09:27
自分で作りたいということであればどこまでできていてどこで躓いているかを説明したほうがいいかと。 (ねむねむ) 2016/07/22(金) 10:21
失礼します。言葉尻をとらえて恐縮ですが、
>>なかなか難しいんですかね
疑問文でレスしておられますが、紹介されたURLを参照して取り組んでみた。 でも、このところが、うまくいかない。 あるいは この部分に意味がよくわからない。 こういうことであれば、
【がんばっているけど、なかなか難しいですね】という表現になりますねぇ。 で、具体的に、ここはどういうようにしたらいいかと、ピンポイントで具体的なテーマで質問するという流れになると思いますが?
>>これできないっすか
できると思って皆さん、参考のURLあるいは検索語を紹介しておられるんですよ。
★そうではなく、自分で調べて頑張るつもりはない。そのまま動かしてOKになるコードをアップしてほしいということであれば はっきりと、そう書かれたらよろしいかと。
それに対して、回答コードがアップされるかどうかはわかりませんが。
今のままだと、きっと、ある程度がんばっておられて、でも、どこかで躓いているのかな? その躓いているところを教えてもらえればお手伝いもできるなと 回答側は、そう思って待ち続ける状況から その先に進まないような気がします。
(β) 2016/07/22(金) 11:39
(明日雨) 2016/07/24(日) 00:00
やる気のある人には出来、無い人には出来ない、ただそれだけのことです。 あなたはひっくり返ってもできないです。 (今日晴) 2016/07/24(日) 01:02
(明日雨) 2016/07/24(日) 02:22
「vba cdo」で検索した、比較的わかりやすいページです。
http://serialty.blog117.fc2.com/blog-entry-10.html
(とおりすがり) 2016/07/24(日) 20:21
Dim atesaki As String, cc As String, c As Range For Each c In ActiveSheet.Range("A3:A40,C3:C40,E3:E40") If c.Value = "宛先" Then atesaki = atesaki & ";" & c.Offset(, 1).Value ElseIf c.Value = "CC" Then cc = cc & ";" & c.Offset(, 1).Value End If Next c On Error GoTo ere Dim oapp, objitem Set oapp = GetObject(, "Outlook.Application") If oapp Is Nothing Then Set oapp = CreateObject("Outlook.Application") Set objitem = oapp.CreateItem(0) With objitem .Subject = "件名" .To = Mid(atesaki, 2) .cc = Mid(cc, 2) .Body = "本文" .Display End With Exit Sub ere: MsgBox "Outlookを立ち上げてから再実行してください" End Sub
(mm) 2016/07/25(月) 16:40
(明日雨) 2016/07/28(木) 22:05
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.