Rename Folder in Outlook Inbox

[Access101]

I would sure appreciate VBA for renaming a couple of folders in my Inbox.

I imagine I'm getting close with this:

Set objOutlook = CreateObject("Outlook.Application")
Set myNameSpace = objOutlook.GetNamespace("MAPI")
Set myInboxFolder = myNameSpace.GetDefaultFolder(olFolderInbox)
Set myFolders = myInboxFolder.Folders(6)

 

[Sue Mosher [MVP-Outlook]]

myFolders.Name = "new name"

would be the next step.

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers