2 Means to Batch Enable “Do not AutoArchive this item” Option for Multiple Outlook Emails

To exclude an item from configured “AutoArchive” in Outlook, you can enable “Do not AutoArchive this item” option for this item. Now, if you want to batch enable this option for multiple items, you can use the 2 ways introduced in this article.

To let Outlook automatically clean up old items, you can configure “AutoArchive” feature in your Outlook. However, at times, you may want to prevent some items from being auto-archived. In this case, you can enable “Do not AutoArchive this item” option for these items. To enable it for one item, you can select the item and press “Alt + Enter”. Then, in the popup dialog box, you can check the “Do not AutoArchive this item” option, as shown in the following figure. But, this means is a bit tedious if there are multiple items to be excluded in “AutoArchive”. Hence, here we’ll share 2 more effective ways, which can let you accomplish it in bulk.

Method 1: Group Emails by “Do Not AutoArchive” Field

1. First of all, open a mail folder.
2. Then, switch to “View” tab and click “View Settings” button.
3. In the popup dialog box, click “Group By” button.
4. Next, in “Group By” dialog, uncheck the “Automatically group according to arrangement” option.
5. After that, select “All Mail Fields” from the drop down list of “Select available fields from” at bottom.
6. Then, choose “Do Not AutoArchive” option from the list of “Group items by”.
7. Later, click several “OK” to save the view changes.
8. After returning to mail list, you can see that all the emails have been divided into two groups – “Yes” and “(none)”.
9. Now, from “(none)” group, select the emails to be excluded in “AutoArchive”.
10. Finally, drag and drop them to the “Yes” group, which will batch enable the “Do no AutoArchive this item” feature on them.

Method 2: Batch Enable for Multiple Emails via Outlook VBA

1. To start with, access VBA editor via “Alt + F11”.
2. Then, put the code below into a module.

Sub NotAutoArchiveMultipleEmails()
    Dim objSelection As Outlook.Selection
    Dim i As Long
    Dim objMail As Outlook.MailItem
    Dim lMailCount As Long
 
    'Get selected items
    Set objSelection = Outlook.Application.ActiveExplorer.Selection
 
    If Not (objSelection Is Nothing) Then
       lMailCount = 0
       For i = objSelection.Count To 1 Step -1
           If objSelection(i).Class = olMail Then
              Set objMail = objSelection(i)
 
              'Enable "Do not AutoArchive this item" feature
              If objMail.NoAging = False Then
                 objMail.NoAging = True
                 objMail.Save
 
                 lMailCount = lMailCount + 1
              End If
          End If
      Next
 
      MsgBox lMailCount & " emails have been set to Not Auto Archive!", vbInformation + vbOKOnly
    End If
End Sub

3. Afterwards, exit the VBA editor.
4. Subsequently, add this macro to Quick Access Toolbar according to “Optional Step” in “How to Run VBA Code in Your Outlook“.
5. Lastly, try this macro.

• First off, select multiple emails.
• Then, click the macro button in Quick Access Toolbar.
• At once, the selected emails have been set not to be auto-archived.

What to Do in Case of Outlook Corruption

Have you ever been subject to Outlook damage before? If you have, how did you deal with it? For most users, the first resort must be the inbox repair tool. Yet, if it fails, users will get panic and don’t know what they can do then. In honesty, inbox fix tool is unable to fix seriously damaged PST. What you can recur to is a more powerful external tool, such as DataNumen Outlook Repair.

Author Introduction:

Shirley Zhang is a data recovery expert in DataNumen, Inc., which is the world leader in data recovery technologies, including recover mdf and outlook repair software products. For more information visit www.datanumen.com