Outlook2000でメールの自動送信方法

前へ 次へ
このQ&Aのポイント
  • Outlook2000でのメール自動送信方法について教えてください。
  • Excelファイルを添付し、個別のメール本文を送信したいです。
  • Windows2000、Excel2000、Outlook2000を使用しており、VBAも少し理解しています。
回答を見る
  • ベストアンサー

Outlook2000でメールの自動送信方法

こんなことが出来たらとても助かるのですが・・・・ 全部で100件程度のメール送付先リストがあります。 リストはエクセルで、 A列に、あて先部署 B列に、あて先担当者名 C列に、メールアドレス　　です。 このリストに対して、いっせいにメールを送りたいのですが、同じ内容ではなく、個別に用意したエクセルのファイルを添付し、同一内容の定型の文言（送付案内および発信者の名前）をメール本文に入れて送りたいのです。 こんなこと可能でしょうか？ 添付するエクセルのBookの名前は、あて先部署となっており、同一フォルダー内に格納しております。 OSはWindows2000、エクセルも2000、メール（OutLook）も2000です。 多少はエクセルVBAをかじってますけど、こんなことは出来るのかどうか見当がつきません。

質問者が選んだベストアンサー

  • ベストアンサー
  • nicotinism
  • ベストアンサー率70% (1019/1452)
回答No.4

完全にギブアップです。 VBSためしました。「デバイスが準備できていない」というエラーになりました。 ↑これも私が予想したエラーとは違ってました。トホホです。 Exchange Serverってなんなんですか ↑MS社のHPなどで調べてください。 端的に言えば、メールサーバとグループウェアなどを統合したようなもの？らしい？？

merlionXX
質問者

お礼

ありがとうございました。

その他の回答 (3)

  • nicotinism
  • ベストアンサー率70% (1019/1452)
回答No.3

単なるSMTPサーバでしたら私でも分かるかなと考えてましたが Exchange Server は全く解りませんので、調べてみましたが WEB上でも「これだ！」いう記述は・・・ 役立たずで申し訳ない。 こちらを閉じて、下記でご相談されては？ http://www2.moug.net/bbs/exvba/ 前々回参照リンクの方も顔を見せるようですので。 下記内容を拡張子.VBS でコピペ保存して（例 送信実験.VBS) 実行(ダブルクリックで)してもエラーに なりますよね？動けば何とかなるかもしれないけど・・・ 実験できる環境に無いので・・ Set oMsg = CreateObject("CDO.Message") oMsg.From = "○○" '○○に両方ともご質問者のメールアドレス oMsg.To = "○○" oMsg.Subject = "Test " oMsg.TextBody = "テストメッセージです" & vbCrLf & Now oMsg.AddAttachment "d:\book1.xls" '適当なファイルのフルパス oMsg.Send

merlionXX
質問者

お礼

ありがとうございます。 VBSためしました。「デバイスが準備できていない」というエラーになりました。 Exchange Serverってなんなんですか？

  • nicotinism
  • ベストアンサー率70% (1019/1452)
回答No.2

OutLook でもOutLook Express でもアカウントの設定の際に 送信サーバを設定してあるはずなのですけど？ ツール → アカウント 既存の電子メールアカウントの表示と変更にだけチェックが入っているのを確認して 次へ 新たな表示に切り替わるので、変更を選択するとサーバー情報が確認できますので 値をコピー。 アカウントの設定はキャンセルして終了 解らなければシステムの担当者にお問い合わせください。 実験は、まずお隣の人とか自身宛のメールで試してみてください。

merlionXX
質問者

お礼

ありがとうございます。 メールサーバーは、Micorsoft Exchange Server　だそうで、名前は@はつかず、アルファベット4文字＋数字2桁＋アルファ別途1文字でした。 これをCells(1,2)に入れましたが、 「-2147220973 The transport failed to connect to the server」となってしまいます。

  • nicotinism
  • ベストアンサー率70% (1019/1452)
回答No.1

OutLook にしろ OutLook Express にしろ セキュリティ上の問題かと思いますが、 いちいち確認させられますので、 BASP21 か CDO を使って送信されては如何でしょう？ CDOでメール送信 http://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub05_800_080.html 配信リストを使ってメールをいっせいに配信する http://www.atmarkit.co.jp/fwin2k/win2ktips/301mailist/mailist.html テンプレートを元に複数のメールを一括配信する http://www.atmarkit.co.jp/fwin2k/win2ktips/401tmplmail/tmplmail.html

merlionXX
質問者

お礼

さっそくありがとうございます。 「CDOでメール送信」というのが役立ちそうです。 すいませんが、ここで指定する、「SMTPサーバー名」はどこで取得できますか？

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. オフィス系ソフト

関連するQ&A

  • アウトルックで既送信のメールを少し修正して再度送る方法はないですか？

    ＶＩＳＴＡのパソコンでアウトルック（アウトルック エキスプレスではありません）でメールを使っています。 少し修整するだけの殆ど同じ内容、添付ファイルのメールを、別のあて先に送付したい時にイチイチ最初から作成するのが面倒です。 既に送ったメールを送信トレイから読み込んで、あて先や内容を少し修正して送信する方法は無いでしょうか？ よろしくお願いします m(_ _)m

  • 個別添付つきメールの一斉送信について

    エクセルリストにメール・企業名・担当者名前があります。 それぞれに対応したＰＤＦを添付してメールにて送る必要があります。 Outlookにて送りたいです。 会社のＰＣを使用すると、どうしてもＳＭＴＰが使えません。 添付をひとつだけ行う「EXCELで同報メール」様のは使うことができますので、 こちらと同じような形で、添付も個別に送付することはできませんでしょうか。 エクセルのマクロでも、アクセスでも、ほかのソフト（有料もＯＫ）でもかまいません。 ＳＭＴＰをつかわず、Outlookで実施ができる方法をご教授くださいませ。

  • エクセルVBAでメール送信

    エクセルのワークシートから、メニューの、「ファイル」、「送信」、「あて先」で現在のシート記載事項をメール本文として送信できますが、その際、ワークシート上のオブジェクトを自動で削除するためにはどうしたらよいでしょうか？ やりたいことは、ワークシート上のドロップダウン等で選んだ定型の文言（ドロップダウン操作により、自動的にシート上に表示されます。）だけを任意のアドレスにメール送信したいということです。現状ではドロップダウン自体やボタンまでメールに添付され、手動で削除しなくてはなりません。

  • エクセルからメールを自動発行させたい。

    エクセル2010を使っています。 A列にメールアドレスが入ったシートが有って、B列に「数値」、C列には「合格」とか「不合格」とかいう値が入った場合に、定型メールが自動発行されるようにしたいのですが。 先ずは点数を通知して、合否が決っまた段階で、合格の人にだけ、その旨の定型メールが発送されるようにしたいのですが。 更に、出来れば、合否によって2種類のメールが自動で送付されるようになれば手間もさることながら、送付ミス、漏れが無くなり1回の作業で済んでしまうのですが。 全員の点数が入力されたら、上から15番目までに「合格」それ以外は「不合格」とC列に自動で入るように条件設定できれば（これは当方でも関数で可能なので）最高にありがたいのですが。 尚、贅沢をいうようで申し訳無いのですが、当方VBAはほとんど使ったことが無いので、出来るだけ分かり易い説明をお願いします。

  • エクセルシートのメルアド一覧に送信する方法は？

    エクセル2010を使っている者です。 メールソフトはサンダーバードと、会社のActivemailです。 メールアドレスの一覧を入力したエクセルシート（A列に名前、B列にメルアド）において、 当該アドレスに一斉にメールを送ることは可能ですか？ 今は、アドレスをコピーして、テキストファイルかワードに張り付けて、宛先欄に入力できるように改行をなくし、コンマをつけてからコピーペーストしているのですが、なかなか手間がかかってしまうので、何か良い方法はないかと思いまして・・ よろしくお願いいたします。

  • Outlook 一斉送信用メールアカウント作成

    Outlook2007で、社内の特定グループに一斉送信できるメールアカウントを作成する方法を教えていただけますでしょうか。 以前いた会社ではグループを作成しての送信ではなく、各部署や各グループごとのメールアカウントがあり、送信したい内容や宛先に応じて使い分けておりました。 今の会社ではそうした環境がないため、自分で作成したく今回質問いたしました。 みなさまのアドバイス、よろしくお願いいいたします。

  • マクロでエクセルをメール送信したい。

    最近、マクロを始めたのですが、マクロでActiveWorkbook（エクセル） を添付して、メール送信までを出来ないかな？と思っています。宛先 はエクセルの別シートにリストで入力しておき、VLOOKUPで参照して、 必要な人に配布したいのです。色々調べたのですが、よくわかりま せん。簡単なやり方があれば教えていただけませんか？ メールソフトはOutlook、OSはWindowsXPです。よろしくお願いします。

  • outlookで個別添付ファイル付きメール一括送信

    お世話になります。 Windows10でMicrosoft 365のOutlookやExcelを使用しています。 50人くらいに、メール本文中には宛先の社名と氏名を記入し、それぞれに別々の添付ファイルを付けたメールを送る必要があります。 Excelシートに メールアドレス、社名、氏名、添付ファイル名 のリストを作っておいて、差込印刷のように一括送信する（できることなら、いきなり送信されるのではなく、下書きフォルダに保存されると尚良い）ことができるソフト(？)など、ご存じの方がいらっしゃいましたら、ぜひ教えてください。 マクロを自分で書くスキルはありません。 宜しくお願いいたします。

  • エクセル　VBAでメール送信について

    エクセルを使用して以下のような条件でメールを送りたいのですがやり方がわかる方は教えてください。 (1)Gmailのアカウントを使用してメール送信 　（差出人はGmail⇒設定⇒アカウントとインポート⇒名前⇒メールアドレスを追加で追加したアドレス） (2)以下のようにエクセルでファイルを作成して一括で送信したい。 　A列⇒宛先 　B列⇒タイトル 　C列⇒本文 　D列⇒送信時間（送信する内容ごとに送信する時間を変更したい） このようなことができるようでしたらご回答お願いいたします。

  • windowsメールで添付ファイルが開けないのと。エクセルで名簿を作り

    windowsメールで添付ファイルが開けないのと。エクセルで名簿を作りメールに添付して送付したらファイルがみつからないのでメールだけ送りますかの文言がでます、添付の仕方を教えて下さい。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する