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