I am trying to open an Outlook folder based on a user input. I have the following code, which does display the folder but opens it in a new window. How do I adjust this such that a new window is not opened and just active explorer/selection changes to the folder I wish to have displayed?
Code: Select all
User_Input := "Client Projects"
Outlook_App := ComObjActive("Outlook.Application")
Namespace := Outlook_App.GetNamespace("MAPI")
Inbox_Folder := Namespace.GetDefaultFolder(6)
Folder_To_Open := Inbox_Folder.Folders(User_Input)
Folder_To_Open.Display
Return