【サンプルリスト】 '================= ' メールを送信する '================= Private Sub Sample() Dim OL As Outlook.Application Dim ML As Outlook.MailItem Set OL = CreateObject("Outlook.Application") Set ML = OL.CreateItem(olMailItem) ML.To = "tatsuya@red.oit-net.jp" 'To ML.CC = "tatsuya@red.oit-net.jp" 'CC ML.BCC = "tatsuya@red.oit-net.jp"
コメントにて以下のようなご要望をいただきました。 ■やりたいこと 指定した時刻になったら、特定のメールアドレス宛に決まったファイルを添付して送信したい。 ■詳細 「決まった件名のメッセージを受信したら、データを CSV ファイルに保存するマクロ」を拡張したいです。 データが追加されたCSVファイル（サンプルでは c:\orders\data.csv）を、指定した時刻（例えば毎日12時）に、特定のメールアドレス（例えば report@example.com）へ自動送信する、という内容です。コンピュータは常に起動しており、ログオンしてネットワークに接続されている環境を想定しています。 Outlook のマクロには、指定した時間にマクロを実行するという機能はありません。しかし、スクリプトを使って Outlook でメールを送信するということは可能です。したがって、メールを送信するスクリプトを作成
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く