![]() Set Item.SaveSentMessageFolder = objFolder Set objFolder = objNS.GetDefaultFolder(olFolderSentMail).Folders("Diane") Set objNS = Application.GetNamespace("MAPI") Private Sub Application_ItemSend(ByVal Item As Object) This sample saves the sent message to a subfolder named "Diane" under the Sent Items folder. You could use an If statement to only move certain messages to the folder. If you always want to use a different folder, you can use a macro to set the Save message to folder. In Outlook 2007 and newer, you can select a different Sent Items folder using the Save Sent Item to Command on the Options ribbon. You can select a different sent items folder for each message by selecting the folder from the Options dialog before sending the message. ![]() Select the folder when sending the message ![]() Save Replies with the Original | Using Rules to file Sent items Select the folder when sending the message | Use VBA to display a dialog
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |