|
▼γ さん:
どうもありがとうがとうございました。
こちらもやってみようと思います。
ほんとに初心者なので一つ一つ勉強です。
>xlDialogSendMailの引数は
>recipients、subject、return_receipt
>であるとヘルプに書かれているので、たぶんCC:はセットできないでしょう。
>
>シートにハイパーリンクを張って、それをクリックしてはどうですか?
>Sub test()
> ActiveSheet.Hyperlinks.Add _
> Anchor:=Selection, _
> Address:="mailto:aaa@xxx.xx.xx&cc=bbb@xxx.xx.xx&Subject=title&body=本文", _
> TextToDisplay:="セルに表示する文字列"
>End Sub
>こうしておけば、固定の相手への定期的なメールには使えます。
>ただし添付ファイルを自動でつけることはできませんが。
>
>本格的にするなら、既にご指摘のとおりの手法がありますが、
>まったくの初心者なら、OutlookとかCDOとかの操作は、もっと先の課題でしょう。
>
># 情報提供になんら異論を挟むつもりはありませんし、
>#「まったくの初心者」などというのは幅のある言葉と承知していますが。
|
|