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