how can we add filter in macro to read outlook mail

Sure, you can use VBA (Visual Basic for Applications) in Excel to interact with Outlook. Here’s a basic example of how you might set up a macro to read emails from Outlook, with filters on the subject and date.

Please replace "Your Subject" and "Your Date" with your actual filter criteria.

Sub ReadEmailsFromOutlook()

    Dim OutlookApp As Object
    Dim OutlookNamespace As Object
    Dim Folder As Object
    Dim OutlookMail As Object
    Dim i As Integer

    Set OutlookApp = CreateObject("Outlook.Application")
    Set OutlookNamespace = OutlookApp.GetNamespace("MAPI")

    ' Pick the folder you want to read emails from
    Set Folder = OutlookNamespace.GetDefaultFolder(6) 'Inbox

    i = 1

    For Each OutlookMail In Folder.Items
        If OutlookMail.ReceivedTime >= "Your Date" And OutlookMail.Subject = "Your Subject" Then
            ' Examine or do something with each filtered email
            ' For example, write some details to the spreadsheet
            Cells(i, 1).Value = OutlookMail.Subject
            Cells(i, 2).Value = OutlookMail.ReceivedTime
            Cells(i, 3).Value = OutlookMail.SenderName
            Cells(i, 4).Value = OutlookMail.Body
            i = i + 1
        End If
    Next OutlookMail

    Set Folder = Nothing
    Set OutlookNamespace = Nothing
    Set OutlookApp = Nothing
End Sub

 

This script will loop through all emails in your Inbox and if the email’s received time is greater than or equal to your specified date and the subject matches your specified subject, it will write the subject, received time, sender’s name, and body of the email to the Excel sheet.

Please note that you need to enable the Microsoft Outlook Object Library in Tools -> References in the VBA editor.

Remember to replace "Your Date" and "Your Subject" with your actual filter criteria. The date should be in the format mm/dd/yyyy.

This is a basic example and might need to be adjusted based on your specific needs and environment. 

Thanks