Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

5955 / 76735

←次へ　｜　前へ→


	【76384】メール新規作成画面　CC欄へ表示

ゆき - 14/11/12(水) 14:14 -


	引用なし

	パスワード

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

0 hits

▼

【76384】メール新規作成画面　CC欄へ表示 ゆき 14/11/12(水) 14:14