| 
    
     |  | はじめまして。 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
 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー
 
 
 |  |