![]() ![]() ![]() To open nested subfolders, add Folders("foldername") as needed: Set objFolder = Session.GetDefaultFolder(olFolderInbox).Folders("subfolder name") Use this code sample to open a subfolder under one of Outlook's default folders. Set objFolder = Session.GetDefaultFolder(olPublicFoldersAllPublicFolders).Folders("my folder") Default Folder Walk to subfolders using the same method used for mailbox subfolders. ![]() To open Exchange public folders, you'll use the GetDefaultFolder method and to get the olPublicFoldersAllPublicFolders folder type. Set objFolder = Session.GetDefaultFolder(olFolderJunk) Set objOlApp = CreateObject("Outlook.Application") This code sample opens a default folder, the Junk Email folder in this example. If adding it to the ribbon, add a New Group or a New Tab and New Group.Select Macros from the Choose Commands From dropdown.Select Customize Ribbon or Quick Access Toolbar.You can use one module for all of these macros. Paste the appropriate macro into the new module.Right-click on Project1 and choose Insert Module.After you are finished creating and testing the macros, you can use Selfcert to sign the macros and change the settings to only signed macros. Go to File, Options, Trust Center, Macro Settings and set macro security to low for now. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |