• 締切済み

Outlookの指定日時以降に配信をマクロで

エクセルで、テンプレートファイル名と任意の送信時間決めます。 ファイル名  送信時間 AAAAA     10:00 BBBBB     11:00 CCCCC     12:00 以上のように設定して、\Application Data\Microsoft\Templates"にある、ユーザーテンプレートを送信ボタンを押すところまでをマクロで一括処理できないかということです。 エクセルとOutlookを連携させるようなマクロで可能でしたらどなたかご教授願います。 環境は Windows XP Outlook2007 Excel2007 よろしくお願い致します。

みんなの回答

回答No.1

下記のようなマクロでどうでしょうか。マクロ自体は Excel でも Outlook でもできるのですが、Excel で作ると送信の際に警告が出てしまうので、Outlook に登録してください。 Public Sub SendTemplateByExcel() Const EXCEL_FILE = "c:\temp\list.xlsx" Const TEMP_FOLDER = "c:\temp\" Dim wkBook As Workbook Dim wkSheet As Worksheet Dim i As Integer Dim objItem 'As MailItem Set wkBook = GetObject(EXCEL_FILE) Set wkSheet = wkBook.Sheets(1) i = 2 While wkSheet.Cells(i, 1) <> "" Set objItem = Application.CreateItemFromTemplate(TEMP_FOLDER & wkSheet.Cells(i, 1) & ".oft") objItem.DeferredDeliveryTime = FormatDateTime(Now, vbShortDate) & " " & wkSheet.Cells(i, 2).Text objItem.Send i = i + 1 Wend End Sub

simachu
質問者

補足

ありがとうございます。 早速試してみます。

関連するQ&A

  • 秀丸エディタ・マクロの質問です

    秀丸エディタを使用して、以下のマクロの作成のやり方を教えてください。 元ファイルから必要なデータの抽出・計算を繰り返して下記の例のような形式で表示したいです。 (ここではAAAAA・BBBBB・CCCCC・DDDDD・hijkの表記のある行を抽出し、 「BBBB-AAAAA+1」「DDDDD-CCCCC」の結果をかかった時間1:、かかった時間2:の横に表記する。 これらの作業を10000件以上繰り返す。 ------------------------------------------------ 例)元ファイル 2013/3/6 10:10:10.100 AAAAA 2013/3/6 10:10:10.110 BBBBB 2013/3/6 10:12:12.120 hijk 2013/3/6 10:14:14.140 CCCCC 2013/3/6 10:14:14.150 DDDDD 2013/3/6 10:15:15.130 abcde 2013/3/6 10:15:16.100 AAAAA 2013/3/6 10:15:16.108 hijk 2013/3/6 10:15:16.110 BBBBB 2013/3/6 10:15:18.150 lmn 2013/3/6 10:15:19.140 CCCCC 2013/3/6 10:15:19.150 DDDDD … …(省略:10000行以上) … 2013/3/6 11:18.20.150 DDDDD ------------------------------------------------ 例)ほしい結果 2013/3/6 10:10:10.100 AAAAA 2013/3/6 10:10:10.110 BBBBB 2013/3/6 10:12:12.120 hijk 2013/3/6 10:14:14.140 CCCCC 2013/3/6 10:14:14.150 DDDDD かかった時間1:11msec(2行目-1行目+1) かかった時間2:10msec(5行目‐4行目) 2013/3/6 10:15:16.100 AAAAA 2013/3/6 10:15:16.108 hijk 2013/3/6 10:15:16.110 BBBBB 2013/3/6 10:15:19.140 CCCCC 2013/3/6 10:15:19.150 DDDDD かかった時間1:11msec(9行目-7行目+1) かかった時間2:10msec(12行目‐11行目) … …(省略:10000行以上) … ------------------------------------------------ 現状で以下の2つのマクロを作成しました(元ファイルで実行します) マクロ1.「AA…~DD…」を含む行の抽出+「かかった時間1:、かかった時間2:」の表記をDDDDDの下に挿入するマクロ マクロ2.時間のみの抽出を行うマクロ(下5ケタのみ 例:10100 小数点は削除) これら2つのマクロを同時に動かし、最終的に上記のような形式にまとめる予定です。 (もしかしたら1つのファイルで動かせるのかもしれませんが、わからなかったので二つにわけました;;) 現在、マクロ2.で抽出した時間からどのようにして「BBBB-AAAAA+1」「DDDDD-CCCCC」を 行えばいいか、また、計算した値をどのようにして「かかった時間1:、かかった時間2:」の 横においていけばいいかがわからない状態です。 マクロ自体さわったことがなく、もう一週間悩んでいます。 どなたか馬鹿な私に教えていただけないでしょうか

  • 秀丸のマクロでカラムごとの処理

    aaaaa,bbbbb,ccccc,ddddd,eeeee 上記のようなCSVファイルで、2カラム目のbbbbbと 4カラム目のdddddの文字を変換するという場合 どういったマクロになりますでしょうか? よろしくお願いします。

  • VBAでマクロを作りたいのですが、、、困ってます

    1問目に答えた人で2問目に答えた人は何人いたか・・・ 2問目で初めて答えた人は何人いたか・・・・というのを計算させたいです。 たとえば(1)のデータがあった時に、(2)のデータのように変換したいとしたらどのようなVBAマクロにすればよいのでしょうか。 (1) 質問No,回答者, 1,AAAAA 1,BBBBB 1,CCCCC 1,AAAAA 2,AAAAA 2,BBBBB 3,AAAAA 3,DDDDD (2) 1 2 3 ←回答回数 1問目 3 2 1 2問目 0 0 3問目 1 上の結果ですが、 1問目で1回目に答えたのはAAAAA,BBBBB,CCCCCの3人、 1問目に答えて2問目に答えたのは、AAAAA,BBBBBの2人、 そのまま2問目に答えた人で3問目にも答えたのはAAAAAの1人、 2問目で初めて答えた人、その中で2問答えたのは0人 3問目で初めて答えた人は、DDDDDの1人 のような表を意味しています。 データは2万行ほどあるので、VBAで処理しなければならないと考えています。 ほかにも何か方法があれば教えていただけると助かります。 どうぞよろしくお願いします。

  • ExcelVBAでテキスト出力で最後の行に追記

    エクセルVBAで、すでに色々と書き込まれているテキストファイルがあり 一番最後の行に追記したいです。 具体的に下記のようなテキストにzzzzzzと追記して aaaaa bbbbb ccccc ddddd 下記のようにしたいです。 どのようにしたらよいのでしょうか? aaaaa bbbbb ccccc ddddd zzzzzz

  • ワードのリストを上下逆の順番にする方法

    ワードで箇条書きにした文章を、上下逆にすることはできますか?? 具体的には下記のようにしたいのですが・・・。 1.AAAAA   1.CCCCC 2.BBBBB → 2.BBBBB 3.CCCCC   3.AAAAA エクセルに移せばできるかな、と思うのですが、簡単にできる方法があればぜひ教えてください☆

  • PHPでDBからデータを抽出してHTMLで表示する

    クライアント上で表示されているHTMLのテキストボックスに入力された文字列をホストに送信し、送信した文字列をSQLの抽出条件に設定してDB(MySQL)に登録しているデータ一覧をPHPで取得後、取得したデータ一覧をクライアントのHTMLのTABLEに一覧で表示したいのですが、どのようにPHPとHTMLをプログラムすればよいでしょうか? イメージ MysSQL テーブル カラム1|カラム2|カラム3| AAAAA|BBBBB|CCCCC| BBBBB|BBBBB|CCCCC| DDDDD|BBBBB|CCCCC| HTML テキストボックス カラム1「AAAA」 検索実行↓ HTML テーブル カラム1|カラム2|カラム3| AAAAA|BBBBB|CCCCC| AAAAA|BBBBB|CCCCC| 素人染みた質問で申し訳ございませんが、ご存知の方がいらっしゃいましたら終えてください。 以上

    • ベストアンサー
    • HTML
  • Dreamweaver現状維持したまま編集不可能領域を編集可能領域へ

    ドリームウィーバーのテンプレートで作っていたページの編集不可能領域を 編集可能領域へ変更したいと思っています。 その際、現状のページの状態を維持したまま 一括で変更することはできますか? もし可能でしたら教えていただきたく思います。 *** 変更前 *** abcabcabcabc <!-- #BeginEditable "A" --> aaaaa <!-- #EndEditable --> <!-- #BeginEditable "B" --> bbbbb <!-- #EndEditable --> <!-- #BeginEditable "C" --> ccccc <!-- #EndEditable --> abcabcabcabc *** 変更後 *** <!-- #BeginEditable "ABC" --> abcabcabcabc aaaaa bbbbb ccccc abcabcabcabc <!-- #EndEditable -->

  • 3つ以上の外部結合から抽出するSQL構文

    次の3つのTABLEから期待する結果(結果を参照)を導きたいのですがJOIN等を使用しても期待と異なります。SQLを教えて下さい。結果は、SELECTでもVIEWでも構いません。一つのSQLでなくても構いません。 ●テーブル構成 テーブル名 - TB_A- -----TB_B--- ----TB_C----         ------ ------------- ------------- 列名     EMPNO EMPNO DATA1 EMPNO DATA2 レコード1   000001 000002 AAAAA 000001 AAAAA レコード2   000002 000002 BBBBB 000002 BBBBB レコード3   000003 000002 CCCCC 000003 CCCCC ●結果 列名     EMPNO DATA1 DATA2 レコード1   000001 ???????? AAAAA レコード2   000002 AAAAA BBBBB レコード3 000002 BBBBB ???????? レコード4   000002 CCCCC ???????? レコード5   000003 ???????? CCCCC

  • シェルスクリプトで・・・

    シェルスクリプトで・・・ 下記のファイル内にある "yy:mm:dd" 部分を "finish - start" として "aaaaaa" "bbbbbb" "cccccc" ・・・を秒単位で抽出させたいと考えています。 □ ファイル 2010-09-01 08:19:10 aaaaa : start. 2010-09-01 08:19:28 aaaaa : finish. 2010-09-01 08:19:28 bbbbb : start. 2010-09-01 08:30:07 bbbbb : finish. 2010-09-01 08:30:11 ccccc : start. 2010-09-01 08:43:45 ccccc : finish. ・・・・・・・・・・・・・・・・・(ry □ 結果のイメージはこうです。 aaaaaa 17 bbbbb 639 ccccc 814 環境は、centos5 を使っております。 どなたかご教授おねがいします。

  • マイクロソフトのエクセルでテキストをインポートする方法について教えてく

    マイクロソフトのエクセルでテキストをインポートする方法について教えてください。 ※1のようなテキストをエクセルにインポートしたいのですが、通常「データ>外部データの取り込み>テキストファイルのインポート」で行うと、改行のみの行も含めてテキストの1行が1つのセルに挿入されますよね? これを改行のみの行を区切りとして、そこまでの単位で1つのセルに挿入したいのです。 ※1でいえば、aaaaaとbbbbbが1つのセルの中で改行されるカタチで挿入され、その下のセルにcccccとdddddが同様に挿入される、といった具合です。 機能でもマクロでもソフトでもどんな方法でもいいので、良い方法があれば教えてもらえませんでしょうか? ※1 aaaaa bbbbb ccccc ddddd

専門家に質問してみよう