No.2ベストアンサー
- 回答日時:
以下のようにすると、1本のメールを複数人に送れます。
Dim Str(4) As String
Str(0) = "email0@*****.co.jp"
Str(1) = "email1@*****.co.jp"
Str(2) = "email2@*****.co.jp"
Str(3) = "email3@*****.co.jp"
ActiveWorkbook.SendMail Recipients:=Str, Subject:="test"
または
ActiveWorkbook.SendMail Recipients:="email0@*****.co.jp,email1@*****.co.jp,email2@*****.co.jp,email3@*****.co.jp", Subject:="test"
最初のは#2の方の回答と似ていますが、#2の方の回答は1本のメールを4人に送るのではなく、4本のメールを単独で1人ずつに送っています。
この回答では、1本のメールを4人に送っています。
「送った相手に、誰々に送っているのか、知らせたい」場合は1本のメールで済ませます。
「送った相手に、誰々に送っているのか、知らせたくない」場合は、個別に4本で送ります。
1本で済ますか個別に送るかは、場合に合わせて使い分けた方が良いでしょう。
chie65536さん、
最初の方に教えていただいた方で完全に希望通りの動作ができました。ありがとうございます。
実は私も2番目と同じ方法を試していたのですが、正しいメールアドレスを入れてOUTLOOK2002、Outlook Expressの双方で試してみましたが、
「宛先一覧の中に存在しない名前が含まれています。正しい名前を指定して、もう一度実行してください。」
というメッセージが出てしまい、送信できずに困っていたところでした。私の環境が悪いのかな?
No.1
- 回答日時:
Sub Test()
Dim Str(3) As String
Dim a As Integer
For a = 0 To 3
Str(0) = "0email@*****.co.jp"
Str(1) = "1email@*****.co.jp"
Str(2) = "2email@*****.co.jp"
Str(3) = "3email@*****.co.jp"
ActiveWorkbook.SendMail Recipients:=Str(a), Subject:="test" & a
Next a
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/04 17:58
- その他(Microsoft Office) outlookで宛先が異なるメールを一括送信する方法 outlookで200人それぞれをtoに指定し 2 2023/08/03 21:24
- Visual Basic(VBA) VBAにてメール作成した際、一部指定箇所のみ赤文字にしたいです。 下記の内容ですと作成されたメール本 1 2022/04/27 13:31
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/02/07 09:58
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/12/26 12:05
- Excel(エクセル) 「Excelのオプション」の「ユーザーインターフェイスのオプション」の設定値をVBAで取得したい 1 2022/07/31 23:49
- Gmail メーラーのThunderbirdの送信機能に関する質問です 3 2022/07/10 10:58
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/11 12:55
- Outlook(アウトルック) Excel表のメールアドレスリストからoutlookの宛先を設定、メールを送信する方法 2 2022/09/16 05:29
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
メールの宛先の「リソース」とは
-
ACCESS2000のレポートのコント...
-
宛先が、recipients not specif...
-
ACCESSで自動でメールをおくる...
-
Outlookで[全員に返信]をクリッ...
-
宛先・cc・Bccをグループ化し...
-
Excelで画像のご担当「北山◯◯様...
-
アンダーバーが表示されない
-
宛先とCCの違いは何でしょうか。
-
Outlook で宛先が複数の場合の人数
-
VBAです。OUTLOOKでウンドウを選択
-
Excel:ハイパーリンクに字数制...
-
サンダーバードで自分宛のメー...
-
Becky!の送信フォルダのレイアウト
-
迷惑メールの遮断法
-
CCを日本語で言うと?
-
差出人と宛先が同じメールって?
-
ACCESS2010 レポートを分割しP...
-
宛先の名前の後に「、」がつく
-
Wordの差し込み印刷でのフィル...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
メールの宛先の「リソース」とは
-
宛先が、recipients not specif...
-
Outlookで[全員に返信]をクリッ...
-
CCを日本語で言うと?
-
Outlook2019の宛先表示について
-
Wordの差し込み印刷でのフィル...
-
アンダーバーが表示されない
-
ACCESS2000のレポートのコント...
-
迷惑メールの遮断法
-
宛先とCCの違いは何でしょうか。
-
宛先の順番が入れ替わってしまう。
-
ACCESS2010 レポートを分割しP...
-
宛先・cc・Bccをグループ化し...
-
Outlookで自分(Outlookのメルア...
-
宛先の名前の後に「、」がつく
-
BCCで送信、宛先は空欄
-
Outlook で宛先が複数の場合の人数
-
BCCで送ると誰に送ったのか...
-
ACCESSで自動でメールをおくる...
-
VBAです。OUTLOOKでウンドウを選択
おすすめ情報