最近会社でThunderbirdからOutlook2010に変わり、こちらで勉強させて頂いています。Thunderbirdでは出来ていた差出人名をアドレス帳から引っ張ってきて登録があれば、その登録通り表示するマクロをこちらで拝見し、実際に試してみました。(全てコピペし、日本語になっている部分は消しました。)すると上手く表示される日と、そうでない日(デフォルト通りアドレスか送信者が設定している名前での表記)があり、1度上手く表示された人でも次の日には表示されない事や登録しているのにも関わらず、1回も上手く表示されないなど、問題が発生してしまいました。当方全くマクロには詳しくなく、見様見真似でさせて頂いていますので、どこか問題があるかと思うのですが、思い当たる節がなく......とても抽象的なご質問にはなってしまいますが、どうか対策をご教示頂けませんでしょうか。AM初歩的な質問で申し訳ありません。小生の環境は、Windows10/Office365です。VBAからOutlookでの送信も行ったことが多数あります。質問内容は以下の通りです。Outlookで2つのアドレス”A@Outlook.jp”と”B@Outlook.jp”を持っており、”A@Outlook.jp”が元々あったアドレスです。”A”は個人用に使っており、ボランティアとして参加している団体との送受信用に”B”を使いたいと考えています。VBAから差出人を”B@Outlook.jp”としてメールを送信したいのですが、”.Save”で下書きを作り、プルダウンで差出人を切り替えて送信することはできるのですが、どうせなら直接”B”から”.Send”で送信したいと思っております。.Senderとか.SendUsingAccount、.SentOnBehalfOfNameを試しているのですが、いまいち上手くいきません。したらよいのか、お教えください。その際、表示される名前も”????”ではなく、指定する表示名で相手先に送信したいと思っています。PM以下のURLでマクロを公開しました。PMとても素晴らしいサイトにたどりつきコメントさせていただきます。お力をお貸しいただきたいです。リストにしたがってファイルを添付して送信するマクロ▼やりたいこと1)グループメールに届くメールを個人メールフォルダ(A)にコピーし、添付ファイルを取り出す。届くメールはタイトルにそれぞれ数字の羅列があります。(B)名前は数字部分が都度変わります。タイトルとの関連性もなし。こちらはエクセルVBA(C)にてファイルの取り出し済み。以下の形式でエクセル(C)にリスト出力されています。A列:番号(連番のメール番号)B列:受信日時C列:タイトルD列:送信元アドレスE列:添付ファイル数F列:エクセルファイル名2).csv/.pdfファイルは不要なので削除し、エクセルファイル(B)に加工を加え(加工後のもの=B’)、上書き保存する。3)個人メールフォルダ(A)のメールに1通ずつ返信する。(一括でやりたい)本文に定型文書を添付。CCにメールアドレスを追加したい。元メールに添付されていたものと同じファイル(B)の加工済みファイル(B’)を添付して送信したい。▼状況1)、2)までは運用できている状態です。3)からができずに困っています。▼困っていることメール1通に対して返信というのは他のVBAを参照してできるかと思いますが、該当ファイルを添付する、更にはこのフォルダ(A)に入っているメールすべてに適用する場合はどのようにしたらよいかわかりません。VBAの範疇なのでしょうか。VBAで1通ずつならばエクセル(C)の情報は使わずに自動で本文に定型文を追加し、該当ファイル(B’)を添付し送信できるものなのでしょうか。お力おかしいただきたく、お願い申し上げます。PM以下のURLでマクロを公開しました。PMいつも参考にさせて頂いております。ありがとうございます。環境)の部の上司より言われ、今後は各社員の外出先や戻る時間を記載するためのホワイトボードをやめ、各社員の行動はoutlookの共有予定表で把握したいということになりました。予定表の共有(名前の横のチェックボックスにチェックを入れればその人の予定が表示される状態)のやり方は分かるのですが、なにぶん人数が多い部署のため、outlookのセットアップをエクセルのVBA(各位にエクセルファイルを配布してそのファイル上に用意されたボタンを押すとoutlookのセットアップを自動でやってくれるイメージ)でやりたいと考えております。私が所属している部は1課と2課に分かれているのでその2つのグループに分け、各50人くらいずつの登録をVBAで行いたいです。知恵を頂きたくお願い申し上げます。方法とマクロを紹介しました。PMoutlookのタスクの自動作成に関する情報が少なく困っています。ある定型件名のメールを受信した時に、タスクとするスクリプトはどのようにしたら良いでしょうか?outlook2010利用です。PM以下のURLでマクロを公開しました。AMいつも参考にさせていただいております。予定表の会議出席依頼で、返信のオプション<新しい時間の指定を許可>の指定についてはこちらに記述があったのですが返信のオプション<返信の依頼>に対応するプロパティが分からずご教示いただけないでしょうか。PidTagResponseRequestedをFalseに設定してみたのですが、送信者側ではオプションのチェックが外れるものの受信者側では変化がありません。設定した予定アイテムから会議出席依頼を送信すると、受信者側ではインフォバーに「開催者はこの会議への返信を要求していません。PMoutlookの仕事の効率化に悩んでおり、教えてください。PC環境は、win10、outlook2016を使用しております。選択中のメールをPDF保存(保存先はデスクトップ)をしたいと思っており、クイックアクセスツールバーかマクロで1クリック/ショートカットキー操作でできるようにしたいと思っています。ちなみに、簡単なExcelマクロは記録機能を改良して作る程度はできますが、Outlookマクロは初心者です。簡単なやり方だとありがたいです。PM以下のURLでマクロを公開しました。PMいつも参考にさせて頂いております。ありがとうございます。メール本文の選択した範囲のみをエクセルへ吐き出すマクロを作りたいと考えております。こちらのサイトを参考にさせて頂き、メールウィンドウを開いた時にはできるようになりましたが、閲覧ウィンドウで実施しようとするとWordEditorが上手く指定できません。(下記★部)閲覧ウィンドウでのWordEditorの設定方法もしくは代替え案があればご教示頂けませんでしょうか。ファイルをフルパスで指定。32ビットになります。64bitOffice365よろしくお願いいたします。PM以下のURLでマクロを公開しました。64ビット版で下記のマクロを動かそうとしています。32bit版のWindowsでは動作しているのですが、下記のコメントのところでエラーになってしまいます。PMお世話になります。いつも本サイトで勉強させていただいております。理解が浅いためかうまく作成することができずお力をお貸しいただけないでしょうか。・連絡先をエクスポート・インポートするスクリプト・連絡先のサブフォルダーをエクスポート、インポートするスクリプト■VBAで実施したいこと既に連絡先に登録されているものを一括で削除したい。連絡先を一括削除(クリア)した後、マスターの連絡先を新規でインポートしたいと考えております。過去記事より、連絡先のエクスポート、インポートはできるようになりましたが、連絡先を一括で削除することがうまくできません。PM連絡先フォルダーの中のアイテムをすべて削除するコードは以下のようになります。PMお世話になります。削除のタイミングが思い通りになりません。特定文字列の削除のタイミングは「転送(Ctrl+R)」「返信(Ctr+Shift+R)」「全員へ返信(Ctrl+F)」ボタン押下または右クリックにより、返信等メール本文が表示される同時にマクロが動くのが希望です。変更版を保存しますかと聞かれるので、上記のタイミングで削除するようにトライしているのですが、うまくいきません。助言よろしくお願いいたします。AMお世話になります。本文中の宛先、CCの名前の後ろにアドレスが表示されるようになってしまいました。この症状は、受信メールの閲覧のみでは発生せず、返信メール作成すると発生します。削除のタイミングが思い通りになりません。特定文字列の削除のタイミングは「転送(Ctrl+R)」「返信(Ctr+Shift+R)」「全員へ返信(Ctrl+F)」ボタン押下または右クリックにより、返信等メール本文が表示される同時にマクロが動くのが希望です。変更版を保存しますかと聞かれるので、上記のタイミングで削除するようにトライしているのですが、うまくいきません。作成者が目視でアドレスが削除されたことを確認したいとの要望があり、上記希望のタイミングでの動作について四苦八苦しているところです。助言よろしくお願いいたします。PMマクロではなくレジストリ設定でご要望の動作は可能です。詳細は以下のURLで公開しました。PMExcell2010マクロからOutlook2010を起動させて、メールを送信するプログラムを作りました。ちなみに、Windows7です。_“楽しみにしております。PMすみません、本文中のアドレスを削除してください。PM以下のコードを送信前に追加してください。AMお世話になります。知見が全くない中Outlookマクロを作成を緊急で迫られており、お力添えいただけると大変助かります。MSO何卒、よろしくお願いいたします。PM以下のURLでマクロを公開しました。PMお世話になります。個人用の連絡先に既にある連絡先の内容をマクロの実行で一括変更するマクロを作成したいと考えております。お力添えをいただけると助かります。上記のように英語部を省くようにするのと、名前を表示名の漢字から参照したいです。(フリガナはあってもなくてもどちらでも構いません)何卒、よろしくお願い致します。PM以下のURLでマクロを公開しました。PMOffice2016を利用しています。ExcelのVBAでOutlookメールを送信しようとしています。リッチテキスト型の本文に、「表を挿入」する方法が分からず困っています。挿入した表の任意のセルに文字を代入する手順も知りたいです。(Excelシートの貼り付けではありません。)よろしくお願いします。PM以下のURLでマクロを公開しました。AMはじめましていつも参考にさせてもらっています。検索フォルダの条件をエクスポートして、別のストアに複製する方法はありませんか?メインのストアは1年ぐらい分のメールを置いておいて、それ以上に古いものはオンラインアーカイブという別のストアに置くことにしてしようと思っていますが、検索フォルダをメインのものから複製するのに、目視で比べながら行うのも面倒だなと感じております。以下の記事も参考にしました。新規に検索フォルダを作成する方法は分かりましたが既存の検索フォルダの検索条件を得る方法が分かりませんでした。https://outlooklab.wordpress.com/2016/10/01/%e3%83%a1%e3%83%bc%e3%83%aa%e3%83%b3%e3%82%b0%e3%83%aa%e3%82%b9%e3%83%88%e7%b5%8c%e7%94%b1%e3%81%a7%e9%80%81%e4%bf%a1%e3%81%95%e3%82%8c%e3%81%9f%e3%83%a1%e3%83%bc%e3%83%ab%e3%81%ae%e5%ae%9f%e9%9a%9b/Session.DefaultStore.GetSearchFolders()で検索フォルダそのものにアクセス可能なことは分かりましたが、検索条件にはたどり着けませんでした。アドバイス頂けると幸いです。PM残念ながら作成済みの検索フォルダーの検索条件をマクロで取得することはできません。返信バンコク小僧と申します。PMOutlookのバージョン1902を使っています。マクロで検索ボックスに任意の文字列をセットしたいのです。いうコーディングのサンプルをネット上で探したのですが見つけることができませんでした。いう文字列を検索するのであれば以下のコードで実現できます。AMいつも参考にさせて頂いております。不躾ではございますが、案件対応上取り決められているメールを出したいのですが送信タイミングが不定、且つ送信に使うPCは遠隔接続NGとの環境的条件がある為とても困っております。OutlookでのVBAはまだまだ経験値が足りず、以下の需要にご助言等頂きたく相談申し上げます。3通は案件で「関係者宛に送る」と取り決められているメール※3通ともほぼ定型。送信先(TO、CC)は固定の面子。ポイントに触れた文面2~3行等。社外持ち出しPC(社内デスクトップPCや社内ネットワークへの遠隔接続NG)から社内デスクトップPCへメールを送る※社内デスクトップPCとは別ドメインのメール※社内デスクトップPCは完全に、社内ネットワーク専用。メールやネット等の一般的な利用は可の為、外からメールを受けることはOK。・終了が大抵夜間~深夜に及ぶ為、現場から直帰が出来る為1~2時間早い帰宅が可能に。構成配置などだけでも、ご助言を賜れれば幸いです。AMすみません、先程ご相談を投稿致しましたが環境についての記載を漏らしておりました。下記の環境にて、試行錯誤しております。半期チャネルネットワーク環境:社内独自ドメインのActiveDirectory。WAN内の拠点内LAN。PMいつも参考にさせて頂いています。上手くいかないので教えてください。PM自己解決しました。ありがとうございました。参考にして作成したコードを載せさせて頂きますのでどなたかの参考になればと思います。“対象でないメールは除外します。PM特定の文字(半角カンマ)を含む差出人(SenderName)からのメールを受信した際に、その特定の文字を全角カンマなどに自動置換したうえで、SenderNameでMsg形式でメールを保存する、ということはできますでしょうか。メール件名(Subject)にこれらの文字を含む場合の置換はできていますが、SenderNameでの置換ができず困っています。読み取り専用であり変更することはできません。AMいつも参考にさせていただいております。複数のemlファイルをフォルダごと取り込む方法についてご相談があり、お力添えいただきたく存じます。マクロを行うことにより、マクロファイルを実行したフォルダとサブフォルダ内のemlファイルを1件ずつ開き、emlファイルの存在したフォルダと同名のフォルダをOutlookの受信トレイ内に作成。各対応フォルダにメールを移動させているのですが、emlを開き、フォルダに移動するという処理を行う度に.emlを開いたウィンドウが瞬時開いては閉じるが繰り返し行われ、処理中にアクティブウィンドウが他ソフトに固定できない状態になっております。1つずつのeml展開時のウィンドウをユーザーには見えない形でフォルダ移動するということは可能でしょうか?何分、勉強不足で、できるかどうかが分かっていません。ご教授いただければ幸いです。ファイルを読み取り専用として開きます。このファイルには書き込むことができません。ファイルを書き込み専用として開きます。‘//ファイルを開き、ファイルの最後に追加して書き込みます。“インポートは終了しました。“インポートは終了しました。ファイルを開くには一度メールを表示する必要があり、ご要望の動作を満たすことはできません。解析」で検索していてこちらにたどり着き、救世主と思い投稿させていただきました。業務で障害が発生していて、やりとりのスレッドが複数発生してしまっており、解析と記録を要求されています。ある文字列:以下のうちどれか1つ以上キーワードA|キーワードB|キーワードC|キーワードD|キーワードE■抽出先のExcelの項目と添付ファイルの保管いついて1.No(A列)|連番2.受信日時(B列)|メールを受信した日時を取得3.件名(C列)|メールの件名4.送信者名(D列)|メールの送信者名5.本文(E列)|メールの本文。6.添付ファイル数(F列)|添付ファイル7.添付のフォルダ保管|フォルダの作成から、エクセルファイルと同じ場所に作成。フォルダがある場合は、既存のフォルダでいいか確認msgをだしてから保存する。ファイルの重複がある場合は、上書きか別名保存か選択して保存ができる。上記の、Excelの入力は、受信日時と件名が重複しないようにする。エクセルへの取得は昇順にする。■実現可能かどうかメール本文で、スレッドが複数ある場合、スレッドごとにExcelに取得することは可能でしょうか。・例えば本文中のResごとに行を変えて取得する・受信メールから件名をみてスレッド単位を取得する・メールのプロパティで、スレッドのidか何かを(メーラーでスレッドに表示がかえられるので値を持ってると思うのですがよくわかっていません)取得して、スレッドをそれぞれExcelに取得する。以上、マクロが全く知識不足ではありますが、どうぞよろしくお願いします。AMいつも参考にさせて頂きありがとうございます。メールに添付されたメールのPDF化が自動化について是非ご教示いただけますでしょうか。メールの自動転送で、受信されたメールが添付ファイルとして送られてきます。PDF化して、特定のフォルダに格納したいのですが、添付ファイルのPDF化というのが見つかりませんでした。エクスポートするマクロ」からメールボックス内のメールPDF化は活用させて頂いておりますが、(これとは別に)自動転送されてきたでメール内の中に添付されたメールを、直接PDF化出来ると非常に助かります。ご教示のほどよろしくお願いいたします。できるかどうかは添付ファイルの種類やそれを開くアプリケーションによって異なります。化は難しいと思われます。AMいつも参考にさせていただいております。連絡先のサブフォルダに「電子メールのアドレス帳にこのフォルダーを表示する」のチェックボックスにチェックを利用者が入れなくても良いように、スクリプトでチェックを入れさせたいと考えています。レジストリ操作かとは思いますが、良きお知恵がありましたら、ご教示いただけますと嬉しく思います。PM以下のURLでマクロを公開しました。AMいつもお世話になっております。VBSでの外部コマンド実行する際のRunメソッドに関して分からない動作があり、質問をさせていただきます。何を指定しても、展開されるウィンドウに変化が無くネット上サンプルを動かしてみたところ全く同じ処理で実行した際にメモ帳(“notepad”)の時には指定通りウィンドウが最大化して開かれるにもかかわらず、電卓(“calc”)など他アプリケーションではエラーも出ていないが指定の実行ウィンドウオプションが全く反映されない現象が発生しました。同現象について調べてみましたが有用なものが無く、手詰まり困っております。分かる方がもしおられましたら、ご教授願えると幸いです。以下スクリプトになります。PM以下のURLでスクリプトを公開しました。ファイルとして保存するマクロ」ページへのコメントと同じポストです。)基本的なことで申し訳ありません。いう場合,そのフォルダが作成されず,中のメールも保存されません。“_”)Nextの部分をフォルダ作成にも適用できればいいと思いますが,やり方がわかりません。VBの問題ですが,ヒントはどこかにありますでしょうか。ループを以下の通りにしてください。AMOutlook2016を利用しています。メールを受信した際、予め指定した複数のドメイン(outlook.jpなど)からのメールであれば、予め指定したエクセルファイルに、送信者のメールアドレスを書き出すマクロが作成可能でしょうか。・同一のアドレスがあれば、受信日時のみ更新、新規受信のときは追加のようにしたく、よろしくお願いいたします。PM以下のURLでマクロを公開しました。AMOUTLOOKのVBAがあることを知り、今の作業を自動化できないか調べています。過去記事を参考にさせていただきマクロ作成を試しているのですが、うまく動作することができず、お力をお貸しいただけないでしょうか。データをメール受信しています。メールには、CSVデータが2つ添付されています。出荷BBB.csv)。夕方に1日の受信した出荷データをエクセルにまとめてファイル名に日付をつけて保存しています。ファイル名:出荷データ_20190930.excelそれぞれ、出荷AAAと出荷BBBシートそれぞれに、データをまとめている。多い時には、12個のメールの添付ファイルを開いて、エクセルにコピペの繰り返し、名前を付けて保存をしており、作業の効率化を図れないか考えています。■実現したいこと(1)指定フォルダ内のすべてのメールの添付ファイル2つををエクセルのそれぞれのシートに書き出し、その日の日付入りの名前をつけて保存したい。指定フォルダにまとめたいメールをコピペしておき、マクロを実行すると、(1)を行ってほしい。できれば、データが古いものから順に貼り付けていきたい。出荷BBB.csvは、データだけでタイトル行がないので、エクセルシートのそれぞれ1行名にタイトル行も設定したい。エクスポートするマクロを参考にしてみましたが、2つの添付ファイルがあるのでわからなくなってしまいました。PMいつも参考にさせていただいております。特定の題名のメールを受信した際、自動的にテキスト型に変更しファイルとして保存するためのマクロを作ったのですが、PC立ち上げをしている時にしか動かない問題が発生しました。基本、帰宅時はPCの電源を切っているのですが、PCを立ち上げていないときにもメールを受信してしまうようで(Office365だからでしょうか)せっかくのマクロの意味が半分なしていないので、どうにかしたいと考えております。お知恵がございましたら、ご教示いただければ幸いです。ビットよろしくお願いいたします。PM以下のURLで解説を公開しました。PM以下のURLでマクロを公開しました。outlookでのマクロ作成ははつです。基本的なことで恐縮ですが、outlookにて受信済みメールのリンクをクリックすると、注意喚起のメッセージとともにはいいいえを表示。はい⇒そのままリンク先表示。いいえ⇒リンク先を表示しない。マクロではメール内のリンクをクリックしたときに何らかの処理をさせることはできません。AMご確認ならびにレス、ありがとうございます。お手間をおかけいたしました。AM過去の記事等を参考に、受信と同時にMsg形式+添付ファイルを特定フォルダに保存等のマクロ処理を行っています。メール本文保存と併せて、本文印刷を行っています。ご質問ですが、印刷ページを2ページまでに設定したいのですが、PrintOutではページ指定まではできないものなのでしょうか。他のサイト含め調べていますが、どうしてもうまく動作せず困っています。マクロでは印刷の詳細な制御はできません。PM現在、複数のアドレスに、それぞれ異なるPDFファイル(ファイルの名前は全部違う、数字1_日付け_数字2で次のような形、000000_20190929_00)を添付して、メールを送っています。アドレスが600件、添付ファイルは2,000個位を毎月手作業で毎回添付してから送信しています。数字1が同じものは、同じ人に送信するので、自動でPDFファイルをメールアドレスに添付できるマクロを作成できればと考えています。ファイル名の一部だけ同じものを自動で添付できるのか?人によって添付ファイルは3個だったり10個だったり、毎月決まっていません。マクロでこのような作業はできるでしょうか?マクロの作り方を、教えていただけたら、大変たすかります。outlook2010、windows7を使っています。PM以下のURLでマクロを公開しました。AMお世話になっております。outlookでマクロが使えることをはじめて知り、本サイトを参考に試させているのですが、うまくいかずヘルプをお願いしした次第です。本サイトや他のサイトでも、受信トレイやサブフォルダーのデータをエクセルへエクスポートする方法の記述はあるのですが、送信済みトレイのエクスポート方法が見当たりません。やりたいことは以下の通りです。それほど難しいことではないと思いますが知識が乏しく、お手数をお掛けいたしますが、ご教示いただけると大変助かります。AM以下のURLでマクロを公開しました。PM仕分けルール設定のされていない宣伝メールについてご相談したく質問させていただきました。※ここで受信トレイの下位に「広告メール」というフォルダを事前に準備していますので、このフォルダを選択します。都度やっているのですが、マクロ化は可能でしょうか?大変恐れ入りますがOutlookのマクロの知識に乏しくご教示いただけると幸甚に存じます。AM以下のURLでマクロを公開しました。代入するよう変更してください。上記のポップアップヒントが表示されなくなります。これをマクロでなんとか表示出来るようにならないかと思いコメント致しました。https://answers.microsoft.com/ja-jp/msoffice/forum/msoffice_outlook-mso_winother-mso_2013_release/outlook2013%e4%ba%88%e5%ae%9a%e8%a1%a8%e3%81%ae/76579a5b-c074-4bdc-9873-7226d4a63b57お手数をおかけしますが、宜しくお願い致します。AM残念ながらマクロでこのような機能を実装することはできません。添付ファイル(ほかのユーザ転送メールです。)を指定のOUTLOOKのフォルダへコピーしたいです。コピーする部分がなかなかうまくできません。......をやってみましたがダメみたいですね!お手数をおかけしますが、宜しくお願い致します。メソッドで保存はできるはずです。PM本サイトにていつもoutlookのマクロの書き方を勉強させて頂いております。自分が不勉強なこともあり、ご相談させて頂きたく思います。業務でメールのやりとりをするのですが、メールを書くのが苦手で、色々と推敲しているうちに時間がかかってしまいます。効率化を考え短時間でメールを書く必要があると認識しており、それには実際に一つ一つのメールにどれだけ時間を要しているかが見える化出来れば考えています。そこでご相談としては、新規作成もしくは返信画面に移行してから、送信までの時間を計測するマクロを組みたいと考えおります。PMこのような処理を実装するにはアイテムが送信もしくは閉じられたタイミングで発生するイベントでかかった時間を計算する必要があります。アイテムが閉じられるタイミングで発生するイベントをマクロで処理するにはいろいろと制約がありかなり困難です。新規メールを書きかけのまま急ぎのメールを別途送信したりというような場合などを考慮すると、計測するのは現実的ではないのではないかと思います。PMOutlookの処理を一部自動化したくて、このサイトにたどり着きました。件名や場所を入力して、[送信]するよろしくお願いいたします。差出人や受信者を含んだ会議出席依頼が作成されます。PM返信ありがとうございました。ショートカットキーが用意されていたのですね。実現したいことができました。ありがとうございます。VBAにはあまり詳しくないのですが、自動返信の方法を模索しており出来ましたらお教えください。・Windows10・Outlook2016■実現したいことメール受信時に、outlookのルール設定で「テスト」フォルダにメールを振り分けています。「テスト」フォルダにあるメールに対して、任意のタイトル・本文・BCCを自動返信できるようにする方法はないでしょうか。受信時に自動返信をするやり方などは、こちらのサイトにもあったので出来るかなと思ったのですが自分ではVBAが分からず・・・・。