How to Batch Remove Attachments from Outdated Calendar Items in Your Outlook

If you wish to remove attachments from outdated appointments and meetings in your Outlook, you can read this article. Here we will introduce you how to realize it in one go.

To reduce the size of your Outlook file, it is highly advisable to clean up old items. This can be realized by the inbuilt “AutoArchive” feature, which can delete the old items automatically at regular intervals. However, some users just wish to delete the attachments in the old items without impacting the items themselves. In the followings, we’ll teach you to bulk remove attachments from old calendar items.

Batch Remove Attachments from Old Calendar Items in Your Outlook

Batch Remove Attachments from Outdated Calendar Items

  1. To begin with, access Outlook VBA editor by “Alt + F11”.
  2. Then, in the “Microsoft Visual Basic for Applications” window, copy the VBA code into a module.
Sub BatchDeleteAttachmentsOfOldCalendarItems()
    Dim objOutlookFile As Outlook.Folder
    Dim objFolder As Outlook.Folder
 
    'Change to your own Outlook file
    Set objOutlookFile = Outlook.Application.Session.Folders("John Smith")
 
    For Each objFolder In objOutlookFile.Folders
        If objFolder.DefaultItemType = olAppointmentItem Then
           Call LoopCalendars(objFolder)
        End If
    Next
End Sub

Sub LoopCalendars(ByVal objCalendar As Outlook.Folder)
    Dim i, n As Long
    Dim objCalendarItem As Outlook.AppointmentItem
    Dim nDateDiff As Integer
    Dim objAttachments As Outlook.Attachments
    Dim objSubCalendar As Outlook.Folder
 
    For i = objCalendar.Items.Count To 1 Step -1
        Set objCalendarItem = objCalendar.Items(i)
 
        'Remove attachments from items that are more than 2 months old
        'Change the datediff as per your needs
        nDateDiff = DateDiff("m", objCalendarItem.End, Now) '=> "m" refers to month; "d" for day; "y" for year
        If nDateDiff > 2 Then
           Set objAttachments = objCalendarItem.Attachments
           If objAttachments.Count > 0 Then
              For n = objAttachments.Count To 1 Step -1
                  objAttachments(n).Delete
              Next
           End If
           objCalendarItem.Save
        End If
    Next

    'Process all subfolders recursively
    If objCalendar.Folders.Count > 0 Then
       For Each objSubCalendar In objCalendar.Folders
           Call LoopCalendars(objSubCalendar)
       Next
    End If
End Sub

VBA Code - Batch Remove Attachments from Outdated Calendar Items

  1. Afterwards, click in “BatchDeleteAttachmentsOfOldCalendarItems” macro.
  2. Ultimately, press “F5” key button to run this macro.
  3. When macro completes, you can check all of your Outlook calendars.
  4. Outlook must have deleted all the attachments of the calendar items that are more than 2 months old.Removed Attachments from Outdated Calendar Items

Cope with Corrupt Outlook Files

Have you ever encountered Outlook corruption? How do you dispose of it usually? More often than not, you would firstly try the inbox repair tool – Scanpst. But, in case of serious PST damage, the built-in utility can’t help you. Thus, it’s suggested to keep a more experienced and remarkable third party tool in vicinity, 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 sql repair and outlook repair software products. For more information visit www.datanumen.com

3 responses to “How to Batch Remove Attachments from Outdated Calendar Items in Your Outlook”

  1. Like any type of various other online dating platform, LatamDate is an internet site where you need to spend some cash. The reliable method of gaining somebody else’s trust fund is by stating their love within days of meeting you on LatamDate or other on-line dating internet sites. As well as fraudsters know this so they attempt to obtain your trust immediately. The suggestion behind Latam Date is that it makes even more feeling to fulfill a person online initially, get to know them a little through their online dating website and make certain you really ‘match’ with each other prior to traveling to the area. Generally, you can spend around 2-4 weeks prior to you can discover an ideal day. Safety and security is a major concern of many people making use of the Internet nowadays, yet especially those that make use of online dating apps and sites to find love. This is among the leading dating websites for worldwide dating. We have great on-line dating website testimonials that could assist you if you are interested in women from this region. This may be a minor function, but it can be really useful when you are speaking to hot foreign women. In the past, if you desired to fulfill an appealing girl from South or Central America, for example, you had no option but to travel there and also invest a whole lot of cash in the hope that you might fulfill that special someone throughout your long-haul see.

    As for I’m concerned though, what I discovered throughout my review process is that you can fulfill Latin American songs without paying Latamdates any charges! I wasn’t looking for love, but my love located me initially. We located that English is the preferred language on Latam Date pages. However, the alternative of mixing the data source with other Qpid Network sites, the mobile app, and also the variety of means to get speaking to women from Latin America suffices to believe that this is a website that should at least be tried, but only if you’re especially seeking to date a woman from that area of the globe. With the internet, the threat of losing your time or money is considerably alleviated since you have accessibility to people that are wanting to fulfill an individual or woman similar to you, also prior to you leave your residence. I’ve looked with this checklist for some time and ultimately made up my mind to text one lady. This is just one of numerous reasons LatamDate is so preferred and why it is considered an official website!

    Probably, that’s the main reason that most profiles are very detailed and, most importantly, confirmed. That’s why it’s very encouraged to follow these 7 tips to ensure that you never ever become a target of scam on online dating web sites. With the growth of web dating came the ability to target your optimal suit much more and also more particularly. Keep in mind, it’s been proven that you’ll locate even more success with on-line dating if you don’t restrict your subscription to one solitary website. The even more details you supply, the much more cost-free credit scores you will certainly obtain. Your account will certainly be deleted. After you supply basic info, you will certainly need to activate your account by verifying your e-mail address. You do not need to pay anything to develop your account, fill out your profile, or make any added adjustments throughout your time on the site. Feel free to utilize it and don’t ever be shy on this site!

    It’s FREE to send as well as review very first reaction! Review as many short articles and guides as this or AmourFactory review to obtain as much information as you can! Initially, can communicate on LatamDate is fee-based. The website has lots of functions as well as devices for you to delight in, as well as if you wish to have a terrific time, you should take into consideration spending a minimum of some cash on your interaction given that it is fee-based here. An application is a great means to do that if you want to remain in touch with your sweethearts whenever you are. Yes, LatamDate has a mobile app that is totally free to download on Android as well as iOS tools. What is Latamdate mobile variation resemble? Component of the Qpid network (not to be confused with Cupid), it’s a modern website, simple to utilize on mobile (including applications) or tablet, desktop computer or laptop, and offers it’s participants the possibility to get talking to its large data source of Latin as well as South American songs for credit scores.

  2. Can you advise how I can find the Outlook calendar folder name to replace “John smith” in the program? The name of the calendar I want to delete attachments from is called “Calendar” and is my default calendar. Thank you.

Leave a Reply

Your email address will not be published. Required fields are marked *