• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:エクセルorアクセス 管理&メール)

ExcelかAccessでお客さん・製品・製造番号・検査時期を管理し、自動でメールを送信する方法はありますか?

このQ&Aのポイント
  • エクセル・アクセス共に2003を使用しており、初心者で使いこなせません。
  • お客さん・製品・製造番号・検査時期を管理し、検査時期が来たら自動でお知らせメールを送信したいです。
  • エクセル・アクセスだけでは難しいと感じており、組み合わせる方法や別の方法を教えていただきたいです。

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

  • ベストアンサー
  • hallo-2007
  • ベストアンサー率41% (888/2115)
回答No.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セルに 本文 を適当に文字で入れておきます

beru2007
質問者

お礼

再度の回答ありがとうございます。 最初に明記していただいたプログラムも動きました! 参考書と参考URLで勉強して頑張りたいと思います。 ありがとうございました。

その他の回答 (2)

  • hallo-2007
  • ベストアンサー率41% (888/2115)
回答No.2

>エクセル・アクセルだけでは到底無理…な気がするのですがエクセルと何かを組み合わせればできる…とか エクセルからでもアクセスからでも出来ます。 一例ですが、エクセルに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にチャレンジしてみる気持ちがあれば、勉強していただいてご希望の動作になるようにプログラムを記述していきます。 そのとき、わからないことにぶつかりましたらここで質問してみると良いでしょう。

beru2007
質問者

お礼

早々の回答ありがとうございました。 難しそうですが方法があるのなら勉強してみたいと思います。 何か、参考になるようなサイトや参考書などありましたら再度教えていただけるとありがたいです(あつかましくてすみません…) VBAやVBA文字で検索していくつか見たのですが、中々いい例題や参考が見付かりませんでした…。 明記していただいたものを実行してみたのですが >D3セルに 本文 をVBA文字で入れておきます ここがどうやって、何を入れればいいのか分からずに適当にabcと入れたのですが、そのせいかエラーになってしまいました。 エラーが出たところで Dim myDATA As MailItem のところが黄色くなったのですが、D3セルに入れた文字が明らかにおかしいからでしょうか?

回答No.1

エクセルやアクセスには「メール送信機能」が無いので、エクセルやアクセスではどうにもなりません。 実現するには、以下の1.と2.を実行するような、複数のアプリケーションを組み合わせた「専用のシステム」を作成する必要があります。 1. 1日1回、エクセルやアクセスから、必要なデータをテキストファイルやCSVファイルに書き出す。 2. 1日1回、書き出されたテキストファイルを読み込んで、日付を判断して送るべき日付になっていたら、メールの宛先や本文を生成し、それをメールとして送信する「独自の専用プログラム」を使ってメールを送信する。 なお上記2.で使用する「独自の専用プログラム」は、高度なプログラム知識が無いと作れません。専門の会社に製作依頼した方が早いでしょう(かなりな額の「開発費」を取られますが)

beru2007
質問者

お礼

早々の回答ありがとうございます。 外に依頼する製作費用はなくて、参考書だったら買ってもいいと言われてます。 …無茶苦茶言いますよね(^^;)

関連するQ&A