Outlook 2007で追加されたFolderオブジェクトのUnReadItemCountプロパティを使うことで未読アイテム数を知ることができます。
Option Explicit
Public Sub CountUnReadItem()
With Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox)
MsgBox "受信トレイにある " & .Items.Count & " アイテム中 " & .UnReadItemCount & " アイテムが未読です。"
End With
End Sub
この記事へのトラックバックはありません。
Office アドインやOffice スクリプト、リボンのカスタマイズに関する話題を中心に情報発信しています。 Microsoft MVP(Office Development) July 2016 -
Copyright © 初心者備忘録 All rights reserved.
この記事へのコメントはありません。