ExcelかAccessでお客さん・製品・製造番号・検査時期を管理し、自動でメールを送信する方法はありますか?
- エクセル・アクセス共に2003を使用しており、初心者で使いこなせません。
- お客さん・製品・製造番号・検査時期を管理し、検査時期が来たら自動でお知らせメールを送信したいです。
- エクセル・アクセスだけでは難しいと感じており、組み合わせる方法や別の方法を教えていただきたいです。
- ベストアンサー
エクセルorアクセス 管理&メール
エクセル・アクセス共に2003です。どっちもほとんど使いこなせない初心者です…。 エクセルかアクセスでお客さん・製品・製造番号・検査時期を管理したいと思ってます。検査時期がきたら自動でお客さんにお知らせメールが自動で行くようにしたいのですが、何か方法はありますか? 例) Aセル Bセル Cセル Dセル Eセル ABC商事 ガスコンロ 12345XWZ 2010年1月20日 abc@xxx.co.jp アイウ建設 冷蔵庫 9876A 2010年5月8日 aiu@xxx.com こんな感じのデータで、Dセルの日付になったらEセルのアドレスに自動で『そろそろ検査時期です』というような内容のメールを送信できるようにしたいのですが、計算式でどうにかできるものでしょうか? できれば送信されるメールのフォーマットの中に客先名・製品名・製造番号が組み込まれるようにしたいと思ってます。 『ABC商事様。 お世話になってます。ガスコンロ(12345XWZ)の検査時期になります』 ↑ものすごく簡略してますが、こんな感じにできれば…と思ってます。 エクセル・アクセルだけでは到底無理…な気がするのですがエクセルと何かを組み合わせればできる…とか、何か方法があればなんでもいいので教えてください。
- beru2007
- お礼率54% (105/193)
- オフィス系ソフト
- 回答数3
- ありがとう数4
- みんなの回答 (3)
- 専門家の回答
質問者が選んだベストアンサー
>Dim myDATA As MailItem >のところが黄色くなったのですが 多分 >OutLookを操作するために、ツール=>参照設定 をクリックして >Microsoft Outlook 10.0 Object Library にチェックを入れてください。 これを実行していないのでは。 エクセルの基本からVBAまで勉強されるのであれば http://www.asahi-net.or.jp/~ef2o-inue/menu/menu01.html その中に http://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub05_800_080.html がありました。 これは、OutLookのVBAではなく、CDOと呼ばれるVBAの機能を利用したコードです。 下の方に >OutLookを操作するために、ツール=>参照設定 をクリックして の画面がありますので参考にしてください。 いずれにしても、結構レベルの高いVBAですが、VBAはマスターしておいても損はないと思います。 本屋さんにも入門書がありますでのがんばってみてください。 >D3セルに 本文 をVBA文字で入れておきます は間違いでした。 >D3セルに 本文 を適当に文字で入れておきます
その他の回答 (2)
- hallo-2007
- ベストアンサー率41% (888/2115)
>エクセル・アクセルだけでは到底無理…な気がするのですがエクセルと何かを組み合わせればできる…とか エクセルからでもアクセスからでも出来ます。 一例ですが、エクセルにOutLookの機能を組み合わせます。 >エクセル・アクセス共に2003です。どっちもほとんど使いこなせない初心者です…。 初心者では難しいと思います。VBAをどこまで使いこなすかで使い方が違ってきます。 参考までに、エクセルからメールを送信する方法です。新しいブックで試してください。 B3セルに メールアドレス(試しにご自身のメールアドレスでも貼り付けておきます) C3セルに タイトル D3セルに 本文 をVBA文字で入れておきます。 ツール=>マクロ=>VBエディター とクリックして VBエディターを起動します。 OutLookを操作するために、ツール=>参照設定 をクリックして Microsoft Outlook 10.0 Object Library にチェックを入れてください。 挿入=>標準モジュール とクリックして Sub ボタン1_Click() Dim myOLApp As Object Dim myDATA As MailItem Set myOLApp = CreateObject("Outlook.Application") Set myDATA = myOLApp.CreateItem(olMailItem) myDATA.To = Range("B3").Value myDATA.Subject = Range("C3").Value myDATA.Body = Range("D3").Value myDATA.Send Set myDATA = Nothing Set myOLApp = Nothing End Sub を貼り付けて閉じます。 再度、ツール=>マクロ=>マクロ とクリックして ボタン1_Click を実行してみてください。 VBAでメールを送信する方法は他にも多数方法があります。 VBAにチャレンジしてみる気持ちがあれば、勉強していただいてご希望の動作になるようにプログラムを記述していきます。 そのとき、わからないことにぶつかりましたらここで質問してみると良いでしょう。
お礼
早々の回答ありがとうございました。 難しそうですが方法があるのなら勉強してみたいと思います。 何か、参考になるようなサイトや参考書などありましたら再度教えていただけるとありがたいです(あつかましくてすみません…) VBAやVBA文字で検索していくつか見たのですが、中々いい例題や参考が見付かりませんでした…。 明記していただいたものを実行してみたのですが >D3セルに 本文 をVBA文字で入れておきます ここがどうやって、何を入れればいいのか分からずに適当にabcと入れたのですが、そのせいかエラーになってしまいました。 エラーが出たところで Dim myDATA As MailItem のところが黄色くなったのですが、D3セルに入れた文字が明らかにおかしいからでしょうか?
- chie65535
- ベストアンサー率43% (8516/19360)
エクセルやアクセスには「メール送信機能」が無いので、エクセルやアクセスではどうにもなりません。 実現するには、以下の1.と2.を実行するような、複数のアプリケーションを組み合わせた「専用のシステム」を作成する必要があります。 1. 1日1回、エクセルやアクセスから、必要なデータをテキストファイルやCSVファイルに書き出す。 2. 1日1回、書き出されたテキストファイルを読み込んで、日付を判断して送るべき日付になっていたら、メールの宛先や本文を生成し、それをメールとして送信する「独自の専用プログラム」を使ってメールを送信する。 なお上記2.で使用する「独自の専用プログラム」は、高度なプログラム知識が無いと作れません。専門の会社に製作依頼した方が早いでしょう(かなりな額の「開発費」を取られますが)
お礼
早々の回答ありがとうございます。 外に依頼する製作費用はなくて、参考書だったら買ってもいいと言われてます。 …無茶苦茶言いますよね(^^;)
関連するQ&A
- エクセルで管理コードを自動採番
エクセルで、お客様からの問い合わせ履歴管理を行いたいと考えています。 問い合わせ1件をシートの1行として登録することを考えています。 その際に、その行の所定のセルに、管理コードを自動的に採番して表示させたいと思っているのですが、どういう方法を使えば実現できるのか、アドバイスお願いいたします。 例えば、コピー機の操作問い合わせ対応の業務で、お客様から問い合わせがあれば内容を1行に登録して、その行の管理コードセルに”ABC001”と自動的にセットしたいのです。 ABCはお客様コードで、001は単純な連番です。 さらに、そのお客様から別の2件目問い合わせがあれば、行追加するとその行にはABC002と自動的に表示されるということもできたら、と考えています。 ABCはその行の所定のセルに入力しています。 ABC ○○商会様 カートリッジ異常 ABC001 ・・・・・ DEF △△サービス様 トナー警告 DEF002 ・・・・・ ABC ○○商会様 続カートリッジ異常 ABC002 ・・・・・ このようなイメージです。 宜しくお願いいたします。
- 締切済み
- その他MS Office製品
- 転送メールの返信時の設定
2台ケータイを使用しているんですが どちらのケータイから返信しても、同じアドレスからの返信として 送信する事は出来ないでしょうか? イメージとしては以下様な感じです。 差出人(abc@xxx.com)が(xyz@xxx.zzz)へメール送信 ↓ (xyz@xxx.zzz)から (abc@ezweb.ne.jp)と(abc@docomo.ne.jp)へ自動転送 ↓ (abc@ezweb.ne.jp)もしくは(abc@docomo.ne.jp)から 差出人(abc@xxx.com)へ(xyz@xxx.zzz)からの返信として送信 後、自動転送時に(abc@ezweb.ne.jp)と(abc@docomo.ne.jp)の from欄に差出人(abc@xxx.com)のアドレスが表示されてほしいです。 ケータイの電話帳と連動させる為です。 よろしくお願いいたします。
- 締切済み
- au
- Excel プルダウンの作成
Excel で 決まった内容を入力する事が多いので、 選択式にしたいと思い、プルダウンを作成したいのですが。 1つのセルにプルダウンを設定し、内容としては ABC あいう アイウ の中から選んで選択するとそれがセルに入る。 どうしたら良いのでしょうか?
- ベストアンサー
- その他(業務ソフトウェア)
- ACCESSからメール送信
教えてください。 会社でACCESS97とメールにグループウエアのロータスノーツを使用しています。 ACCESSのテーブルをエクセルにエクスポートして、メールに添付して送信という作業を毎日しているのですが、このメールに添付して送信という作業を自動化できるものでしょうか?
- ベストアンサー
- その他(データベース)
- アクセスやエクセルから一斉メール。
アクセスやエクセルから一斉メール。 アクセスや、エクセルで名簿を管理しているのですが、その中のe-mailで一気に 送信することはできないのでしょうか。(BCCで)
- ベストアンサー
- その他(メールサービス・ソフト)
- AccessやExcelをプログラムしてメールが送信できますか?
顧客情報などを整理し、例えば支払い滞納者を抽出して一括で督促メールを送信したり、振り込み済みの客を抽出して一括で入金確認のメール送信等が出来ないかと思っています(もちろんそれぞれの宛名を入れて)。AccessやExcelだけではメールは送れませんか?・何か連動できるメーラーやそのようなプログラムが必要になるのでしょうか?。安いソフトがあれば一番楽なんですが、何か良いアイデアありませんか?教えてください。
- ベストアンサー
- その他(データベース)
- アクセスのデータをエクセルへ…
アクセスのデータベースから抽出した項目のデータを エクセルのレイアウト上の各セルに振り分けて エクセルを自動で名前を付けて保存する方法はないですか?
- 締切済み
- その他(業務ソフトウェア)
- アクセス、エクセルのデータベースを生かしてメール送信
アクセスかエクセルのデータを挿入文字として取り込みメールを送信できるソフトを紹介してください。金額はごだわりません。
- ベストアンサー
- その他(メールサービス・ソフト)
- ExcelからAccessデータを検索するマクロ
ExcelのA1セルにある値をAccessのデータベース (ファイル名:abc.mdb、テーブル名:Tbl_a)の フィールド1から検索し、対応するレコードの フィールド2の値をExcelのB1セルに書き込む というマクロはどのように書けばよいのでしょうか? Excel, Accessともに2000です。 よろしくご教授お願いします。
- ベストアンサー
- オフィス系ソフト
- VBA エクセル+アウトルックで自動メール送信
エクセル、アウトルックともに2003です。 VBAは初心者でほとんど分からないのですが、下記のようなことはできますか? エクセル、シート1に顧客管理台帳を作りました。 A1セル メールタイトル(共通) A2セル 会社名 A3セル 担当者名 A4セル Eメールアドレス エクセル、シート2には送信する基本文章を入れようと思ってます。 A1セル 会社名が反映されるように A2セル 担当者名が反映されるように A3~A5セル 用件 シート1は50件ほどの顧客リストとなってます。 マクロ(VBA?)で1件ずつ、メールアドレス・タイトル、本文に会社名・担当者・用件が自動で入るようにしたいのですが、このようなことはできるのでしょうか? 送信前に内容を一応チェックしてから送信したいと思ってますので、送信ボタンを押すのは手動にしたいです。
- 締切済み
- オフィス系ソフト
お礼
再度の回答ありがとうございます。 最初に明記していただいたプログラムも動きました! 参考書と参考URLで勉強して頑張りたいと思います。 ありがとうございました。