2 Quick Means to Archive All Read RSS Items in Your Outlook

If you would like to archive all the RSS items that you have read in Outlook, you can use either of the 2 methods introduced in this article.

As we all know, the larger Outlook file, the more vulnerable Outlook data. Hence, in order to keep Outlook file in small size, you may want to delete or archive the useless items, such as the RSS items which you’ve read already. Here we’ll guide you to quickly archive all read RSS items by 2 handy means.

Method 1: Archive All Read RSS Items Manually

  1. At first, in the mail folder list, click on “RSS Feeds” folder.
  2. Then, press “Ctrl + E” key buttons.
  3. Next, on “Search” tab, click “All subfolders” in the “Scope” group.
  4. Subsequently, input “read:yes” in the search box.Search All Read RSS Items
  5. After a while, all the read RSS items will be listed out.
  6. Then, pitch on a search result and press “Ctrl + A” to select all results.
  7. After that, right click and choose “Move” > “Other Folder”.Move Search Results to Other Folder
  8. In the popup dialog box, create a new folder to save these found RSS items.Create a New Folder for Found RSS Items
  9. After clicking “OK”, all the selected items will be moved to the new folder.
  10. Later, go to “File” menu, in which click “Cleanup Tools” and select “Archive”.
  11. Finally, in the new “Archive” dialog box, select the new folder and click “OK”.Archive Items in New Folder

Method 2: Archive All Read RSS Items with VBA

  1. First of all, press “Alt + F11” to access VBA editor.
  2. Then, put the following VBA code into a module.
Sub ArchiveAllReadRSSItems()
    Dim objRSSFeedsFolder As Outlook.Folder
    Dim objArchiveFile As Outlook.Folder
    Dim objFolder As Outlook.Folder
 
    Set objRSSFeedsFolder = Outlook.Application.Session.GetDefaultFolder(olFolderRssFeeds)

    'Change the path to your own Archive PST file
    Application.Session.AddStore "C:\Users\Test\Documents\Outlook Files\Archive.pst"
    Set objArchiveFile = Application.Session.Folders.GetLast()
 
    For Each objFolder In objRSSFeedsFolder.Folders
 
        On Error Resume Next
        Set objArchiveFolder = objArchiveFile.Folders(objFolder.Name)
        If objArchiveFolder Is Nothing Then
           Set objArchiveFolder = objArchiveFile.Folders.Add(objFolder.Name)
        End If
 
        For i = objFolder.Items.Count To 1 Step -1
            If objFolder.Items(i).UnRead = False Then
               objFolder.Items(i).Move objArchiveFolder
            End If
        Next
    Next
End Sub

VBA Code - Archive All Read RSS Items

  1. Afterwards, press “F5” key to run this macro.
  2. At once, when macro finishes, the “Archive” Outlook file will be displayed in the mail navigation pane.
  3. Expand the “Archive” file, and you will see that all read RSS items have been here, as shown in the following figure.Archived RSS Items

Handle Vexing Outlook Issues

Outlook is vulnerable to multiple factors, such as viruses, human errors, software faults, hardware issues and so on. Therefore, it is pretty common to encounter all kinds of troubles in Outlook. So, it is necessary to learn how to deal with them. In general, we can use the inbox repair tool to fix them. Yet, if the problem is serious PST corruption, we are better off resorting to a more powerful and reliable utility, like DataNumen Outlook Repair. It can repair Outlook problems effortlessly.

Author Introduction:

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