Souris wrote:

You would need to write a Visual Basic procedure (macro) using
Automation to Outlook to get the information for you.

I guess it would go something like:

Function GetNumberOfItemsInFolder(FolderName As String)
 Dim oOut As New Outlook.Application
 Dim oNS As Outlook.NameSpace
 Dim oF As Outlook.MAPIFolder
 Set oNS = oOut.GetNamespace("MAPI")
 Set oF = oNS.Folders("Personal Folders").Folders(FolderName)
 GetNumberOfItemsInFolder = oF.Items.Count
 Set oNS = Nothing
 Set oOut = Nothing
End Function

Then in a worksheet cell you could put
=GetNumberOfItemsInFolder("InBox")

If you want it updated at each recalculate then you would need to add  
Application.Volatile
before the first Set line

Bill Manville
MVP - Microsoft Excel, Oxford, England
No email replies please - respond to newsgroup