コピー2019.06.03皆様こんにちは、ノグチです。前回の記事では、特定のフォルダにメールがあったらOutlook終了時にメッセージを表示する方法をご紹介しました。VBA】QuitイベントでOutlook終了時にメッセージを表示するOutlook終了時に実行されるイベント、Quitイベントで、Outlook終了時にメッセージを表示させる方法をご紹介しています。返信が必要なメールは専用のフォルダに入れておいて、このイベントを使えば、返信していないメールがあることを知らせることができますよ。tonari-it.com2019.05.27しかし返信しないといけないメールだったり、重要な内容のメールを格納しておくフォルダならば、Outlook終了時ではなく、パッと見でフォルダにメールが何件あるか見られるようにしておきたい...そういえば受信フォルダは、未読メール件数を表示してくれますよね。いうことで今回は、フォルダ内のメール件数を表示できるように、受信フォルダ内の既読メールを未読メールにする方法をご紹介します。VBA】メールをワンクリックで操作しようUnreadプロパティで既読メールを未読メールにするメールの既読・未読をセットするには、MailItemオブジェクトのUnreadプロパティを使います。UnreadプロパティにTrueをセットするとメールを未読メールに、Falseを指定すると既読メールにすることができます。MailItemオブジェクト.Unreadでは試しに、このUnreadプロパティを使って、今開いているメールを未読メールにしてみましょう。Subこのメールを開きつつ、上のコードを実行してみると...この通り、既読メールが未読メールになっていますね。フォルダ内のメールを全て既読にする受信フォルダを右クリックすると、「全て開封済みにする」という、フォルダ内のメールを全て既読メールにする機能がありますよね。それをVBAでやってみましょう。こちらの「重要」フォルダ内には、未読メールが5件あります。この5件のメールを、VBAで既読メールにしてみましょう。Subまず「重要メール」フォルダのFolderオブジェクトを取得して、Itemメソッドでフォルダ内にあるメールのMailItemオブジェクトを取得。各メールのMailItemオブジェクトのUnreadプロパティにFalseをセットしていくコードです。こちらを実行して、フォルダの中を覗いてみると...この通り、メールが全て既読になっていますね。要返信メールをフォルダに移動して未読メールにするコード折角なので、前々回までの記事でご紹介した、後で返信が必要なメールを「要返信」フォルダへ移動させるコードに、今回ご紹介しているUnreadプロパティを加えて、既読メールを未読メールにしつつ、「要返信」フォルダへ移動させてみましょう。"予定を確認後連絡します。"予定を確認後連絡します。Sub最後のMoveメソッドで「要返信」フォルダに移動させる手前にUnreadプロパティで未読メールにしています。このコードを実行すれば、「要返信」フォルダに格納されたメールが未読メールになって、フォルダ名の隣にフォルダに何件メールがあるか一目瞭然ですね!最後に今回は、MailItemオブジェクトのUnreadプロパティで、既読メールを未読メールにする方法をご紹介しました。Unreadプロパティは単体ではあまり用途が無いように思えますが、今回のように他のメソッドやイベントと組み合わせると、便利な使い道がありそうですね。VBA】メールをワンクリックで操作しよう基本機能に加えてVBAを使えばもっと便利になるOutlook。メールの返信、フォルダ移動だってワンクリックでできますよ。投稿者プロフィールノグチフリーランスPG・SE元製造子会社SE。業務システム保守・導入両方やった経験をお伝えすることで、少しでもシステムや手作業に悩まされる人が減ればいいなぁと日々夢見ております。「コミュニティ+講座」形式で継続性&教え合える環境も提供。!ノンプログラマーがプログラミングスキルを身に着ける支援ををするコミュニティ。セミナー・もくもく会・Facebookグループのサポートで「自らで学び続ける力をつける」支援、「教え合うことで学びの価値を上げる」場の提供をしています。VBAで、受信ボックスの未読メール件数を取得してメッセージ表示させる方法をご紹介しています。懇切丁寧に解説したいと思います。初心者向けエクセルVBAでIEを操作するシリーズ7回目。今回はHTMLにおけるテーブルの構成の仕方に触れつつ、そのテーブル内のデータを取得するというWEBスクレイピングらしいテクニックを解説します。【エクセルVBA】RefreshメソッドとRefreshTableメソッドでピボットテーブルを自動更新させてみようWorksheet.Changeイベントとピボットテーブル更新のPivotTableオブジェクトのRefreshTableを組み合わせて、シートが更新されたらピボットテーブルを自動更新させる方法をご紹介しています。同じピボットテーブル更新のPivotCacheオブジェクトのRefreshメソッドもご紹介していますよ。請求書作成マクロを題材としてエクセルVBAでテーブルを操作する方法についてお伝えするシリーズです。今回は、テーブルのデータ行を追加して値を入力をする、Addメソッドの使い方をお伝えしていきますね。「初心者でもわかるエクセルVBAのクラスモジュール」についてシリーズでお伝えしています。今回は、エクセルVBAでクラスのインスタンス生成時にデータを簡単に格納する、つまりコンストラクタ的なメソッドを作る方法です。「コミュニティ+講座」形式で継続性&教え合える環境も提供。詳細・お申込はこちら隣ITを応援する当ブログを「応援したい!」「役に立ったよ!」というお気持ちを、コチラからお支払いただくことができます。日々更新の活力倍増いたします。※PayPalアカウントが必要です。※金額は変更可能です。Platform23HTML・CSS32iPhone・アプリ29Monaca・スマホアプリ開発7PC全般・Windows86PowerPoint・VBA28Python87RPA1VBScript15Vue.js・JavaScript13WEBサービス・クラウド68WordPress・ブログ88Word・VBA42コミュニティ・イベント109セミナーのお知らせ11チャットワーク72データ分析・アクセス解析40仕事・生産性・働き方73動画配信8商業出版21起業・フリーランス72電子書籍・Kindle3運営会社プランノーツは"IT×働き方改革"をお手伝いする会社です。「コミュニティ+講座」形式で継続性&教え合える環境も提供。詳細・お申込はこちら隣ITを応援する当ブログを「応援したい!」「役に立ったよ!」というお気持ちを、コチラからお支払いただくことができます。日々更新の活力倍増いたします。※PayPalアカウントが必要です。※金額は変更可能です。Platform23HTML・CSS32iPhone・アプリ29Monaca・スマホアプリ開発7PC全般・Windows86PowerPoint・VBA28Python87RPA1VBScript15Vue.js・JavaScript13WEBサービス・クラウド68WordPress・ブログ88Word・VBA42コミュニティ・イベント109セミナーのお知らせ11チャットワーク72データ分析・アクセス解析40仕事・生産性・働き方73動画配信8商業出版21起業・フリーランス72電子書籍・Kindle3運営会社プランノーツは"IT×働き方改革"をお手伝いする会社です。Scriptが「V8ランタイム」をサポート!モダンなECMAScript構文が使えるようになった2020.02.072020.02.08GASでコピーしたGoogleスライドのプレゼンテーションを取得する方法2020.02.052020.02.05Facebookページいつも隣にitのお仕事タイトルとURLをコピーしました。