MailItem.MarkForDownload Property (Outlook)
Returns or sets an OlRemoteStatus constant that determines the status of an item once it is received by a remote user. Read/write.
The following example searches through the user's Inbox for items that have not yet been fully downloaded. If any items are found that are not fully downloaded, a message is displayed and the item is marked for download.
Sub DownloadItems() Dim mpfInbox As Outlook.Folder Dim obj As Object Dim i As Integer Set mpfInbox = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox) 'Loop all items in the Inbox folder For i = 1 To mpfInbox.Items.Count Set obj = mpfInbox.Items.Item(i) 'Verify if the state of the item is olHeaderOnly If obj.DownloadState = olHeaderOnly Then MsgBox ("This item has not been fully downloaded.") 'Mark the item to be downloaded. obj.MarkForDownload = olMarkedForDownload End If Next End Sub