|
はじめまして。
VBA全くの初心者です。
現在下記のようなコードを使用し、申込ボタンをクリックすると
新規メール画面が立ち上がり、宛先欄にアドレスが表示され、
同時に件名も表示されている状態です。
これだと全部のアドレスが宛先欄に表示されているので、
CC欄にも表示させたい(例えばアドレス5.と6.)と思っているのですが、
方法がわかりません。
どなたか分かる方がいらっしゃいましたらお願いいたします。
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー
Private Sub CommandButton1_Click()
Dim adr As String
Const adr1 As String = "アドレス1."
Const adr2 As String = "アドレス2."
Const adr3 As String = "アドレス3."
Const adr4 As String = "アドレス4."
Const adr5 As String = "アドレス5."
Const adr6 As String = "アドレス6."
Application.Dialogs(xlDialogSendMail).Show Array(adr1, adr2, adr3, adr4, adr5, adr6), "切手・収入印紙申込"
End Sub
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー
|
|