MailItem.SaveSentMessageFolder Property

Outlook Developer Reference

Returns or sets a Folder object that represents the folder in which a copy of the e-mail message will be saved after being sent. Read/write.

Syntax

expression.SaveSentMessageFolder

expression   A variable that represents a MailItem object.

Example

This Visual Basic for Applications (VBA) example sends a reply to Dan Wilson and sets the SaveMyPersonalItems folder as the folder in which a copy of the item will be saved after being sent. To run this example without errors, make sure a mail item is open in the active inspector window and replace 'Dan Wilson' with a valid recipient name.

Visual Basic for Applications
  Sub SetSentFolder()
    Dim myItem As Outlook.MailITem
    Dim myResponse As Outlook.MailITem
    Dim mpfInbox As Outlook.Folder
    Dim mpf As Outlook.Folder
Set mpfInbox = Application.Session.GetDefaultFolder(olFolderInbox)
Set mpf = mpfInbox.Folders.Add("SaveMyPersonalItems")
Set myItem = Application.ActiveInspector.CurrentItem
Set myResponse = myItem.Reply
myResponse.Display
myResponse.To = "Dan Wilson"
Set myResponse.<strong class="bterm">SaveSentMessageFolder</strong> = mpf
myResponse.Send

End Sub

See Also