2 Metoder för att exportera alla e-postmeddelanden från en specifik avsändare till en Excel-fil

Om du snabbt vill exportera e-postmeddelanden från en specifik avsändare till en Excel-fil kan du använda följande två metoder som introducerats i den här artikeln.

Av vissa anledningar, till exempel att göra en sammanfattning, kan du ibland behöva exportera specifika e-postmeddelanden, till exempel e-postmeddelanden från en viss avsändare, till en Excel-fil. När det gäller export kommer den ursprungliga funktionen "export" att inträffa till most användarnas sinnen i första hand. Men för att vara ärlig, använder Outlook VBA mycket bättre än den traditionella "Export" -funktionen. Nu kommer vi att introducera de två metoderna i detalj.

Metod 1: Använd funktionen "Exportera"

1. Starta din Outlook-applikation redan från början.
2. Klicka sedan i sökrutan i e-postlistan, som aktiverar menyn "Sökverktyg".
3. Klicka på knappen "Från" i menyfliksområdet.
4. Byt sedan ut “avsändarens namn” -tecken med den specifika avsändarens namn.
5. Därefter visas bara e-postmeddelanden från den specifika avsändaren i listan. Tryck nu på "Ctrl + A" för att välja dem alla.
6. Nästa högerklicka och välj ”Flytta”> ”Annan mapp”.
7. Skapa sedan en ny mapp i popup-fönstret "Flytta objekt" och välj den här mappen för att flytta specifika e-postmeddelanden till.
8. Därefter kan du gå till "Arkiv"> "Öppna"> "Importera".
9. Välj sedan Exportera till en fil i följande dialogruta>> Nästa ">" Microsoft Excel 97 - 2003 ">" Nästa ".
10. Välj sedan den specifika mapp som lagrar e-postmeddelanden från den specifika avsändaren och tryck på "Nästa".
11. Klicka sedan på "bläddra" för att välja en Excel-fil eller skapa en ny Excel-fil.
12. Senare klickar du på "Nästa"> "Slutför".
13. Slutligen fungerar Outlook för att exportera. När exportprocessen är klar kan du hitta och öppna den här Excel-filen.

Metod 2: Använd Outlook VBA

1. För det första trycker du på “Alt + F11” -knapparna.
2. Öppna sedan i popup-fönstret en ny modul och kopiera följande koder till den.

Sub ExportEmailsfromSpecificSender()
    Dim objEmails, objSpecificEmails As Outlook.Items
    Dim objItem As Object
    Dim strSpecificSender As String
    Dim strFilter As String
    Dim objExcelApplication As Excel.Application
    Dim objExcelWorkbook As Excel.Workbook
    Dim objExcelWorksheet As Excel.Worksheet
    Dim nRow As Integer
    Dim strFilePath As String
 
    On Error Resume Next
    'Get the emails from a specific sender
    Set objEmails = Application.Session.GetDefaultFolder(olFolderInbox).Items
    strSpecificSender = InputBox("Input the name of the specific sender:", "Specify Sender")
    strFilter = "[From] = '" & strSpecificSender & "'"
    Set objSpecificEmails = objEmails.Restrict(strFilter)
 
    Set objExcelApplication = CreateObject("Excel.Application")
    Set objExcelWorkbook = objExcelApplication.Workbooks.Add
 
    'Export the specific emails to worksheet
    Set objExcelWorksheet = objExcelWorkbook.Worksheets(1)
    With objExcelWorksheet
         .Cells(1, 1) = "Subject"
         .Cells(1, 2) = "Received"
         .Cells(1, 3) = "Body"
         .Cells(1, 4) = "Categories"
         .Cells(1, 5) = "Size"
    End With
 
    nRow = 2
    For Each objItem In objSpecificEmails
        With objExcelWorksheet
             .Name = "From " & strSpecificSender
             .Cells(nRow, 1) = objItem.Subject
             .Cells(nRow, 2) = objItem.ReceivedTime
             .Cells(nRow, 3) = objItem.Body
             .Cells(nRow, 4) = objItem.Categories
             .Cells(nRow, 5) = objItem.Size
        End With
        nRow = nRow + 1
    Next
 
    objExcelWorksheet.Columns("A:E").AutoFit

    'Save the Excel workbook
    strFilePath = "C:\Report\Emails from " & strSpecificSender & ".xlsx"
    objExcelWorkbook.Close True, strFilePath
 
    'Notify you of the export complete
    MsgBox ("Export Complete!")
End Sub

3. Klicka sedan på ikonen "Kör" i verktygsfältet.
4. Därefter måste du ange namnet på den specifika avsändaren.
5. Klicka senare på “OK”.
6. Omedelbart kommer Outlook att start för att exportera e-postmeddelanden från den specifika avsändaren och spara Excel-filen i den förutbestämda målmappen.
7. När exporten är klar kan du gå till målmappen för att öppna och kontrollera den.

Bli av med Outlook-problem flexibelt

På grund av det faktum att Outlook är mottagligt för olika fel rekommenderas det att hålla en potent Outlook-fix verktyg i närheten, t.ex. DataNumen Outlook Repair. I det här fallet, för att lösa de små felen, kan du helt enkelt använda Scanpst.exe. Men för de allvarliga problemen kan du tillgripa det mer robusta verktyget.

Författarintroduktion:

Shirley Zhang är expert på dataåterställning DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive skadad SQL Server och Outlook-programvara för reparationsprogramvara. För mer information besök www.datanumen.com