2 Methoden zum Exportieren aller E-Mails von einem bestimmten Absender in eine Excel-Datei

Jetzt teilen:

Wenn Sie die E-Mails eines bestimmten Absenders schnell in eine Excel-Datei exportieren möchten, können Sie die folgenden zwei in diesem Artikel beschriebenen Mittel verwenden.

Aus bestimmten Gründen, z. B. zum Erstellen einer Zusammenfassung, müssen Sie möglicherweise bestimmte E-Mails, z. B. E-Mails eines bestimmten Absenders, in eine Excel-Datei exportieren. Beim Exportieren wird die native Funktion "Exportieren" für m ausgeführtost die Gedanken der Benutzer an erster Stelle. Um ehrlich zu sein, ist die Verwendung von Outlook VBA viel einfacher als die herkömmliche Exportfunktion. Jetzt werden wir die beiden Mittel im Detail vorstellen.

Exportieren Sie alle E-Mails von einem bestimmten Absender in eine Excel-Datei

Methode 1: Verwenden Sie die Exportfunktion

  1. Starten Sie gleich zu Beginn Ihre Outlook-Anwendung.
  2. Klicken Sie dann in das Suchfeld in der E-Mail-Liste, um das Menüband "Suchwerkzeuge" zu aktivieren.
  3. Klicken Sie im Menüband auf die Schaltfläche „Von“.
  4. Ersetzen Sie dann das Zeichen "Absendername" durch den Namen des jeweiligen Absenders.E-Mails von einem bestimmten Absender suchen
  5. Danach werden nur die E-Mails des jeweiligen Absenders in der Liste angezeigt. Drücken Sie nun "Strg + A", um alle auszuwählen.
  6. Klicken Sie anschließend mit der rechten Maustaste und wählen Sie "Verschieben"> "Anderer Ordner".
  7. Erstellen Sie anschließend im Popup-Dialogfeld "Elemente verschieben" einen neuen Ordner und wählen Sie diesen Ordner aus, in den die spezifischen E-Mails verschoben werden sollen.Verschieben Sie die spezifischen E-Mails in einen neuen Ordner
  8. Danach können Sie zu "Datei"> "Öffnen"> "Importieren" gehen.
  9. Wählen Sie dann im folgenden Dialogfeld "In eine Datei exportieren"> "Weiter"> "Microsoft Excel 97 - 2003"> "Weiter".
  10. Wählen Sie als Nächstes den Ordner aus, in dem die E-Mails des jeweiligen Absenders gespeichert sind, und klicken Sie auf "Weiter".Export-Assistent
  11. Klicken Sie dann auf "Durchsuchen", um eine Excel-Datei auszuwählen oder eine neue Excel-Datei zu erstellen.
  12. Klicken Sie später auf "Weiter"> "Fertig stellen".
  13. Schließlich funktioniert Outlook beim Exportieren. Nach Abschluss des Exportvorgangs können Sie diese Excel-Datei suchen und öffnen.

Methode 2: Verwenden Sie Outlook VBA

  1. Drücken Sie zunächst die Tasten „Alt + F11“.
  2. Öffnen Sie dann im Popup-Fenster ein neues Modul und kopieren Sie die folgenden Codes hinein.
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

VBA-Codes - Exportieren Sie alle E-Mails von einem bestimmten Absender in eine Excel-Datei

  1. Klicken Sie anschließend in der Symbolleiste auf das Symbol „Ausführen“.
  2. Danach müssen Sie den Namen des jeweiligen Absenders eingeben.Geben Sie den Namen eines bestimmten Absenders ein
  3. Klicken Sie später auf "OK".
  4. Sofort wird Outlook start, um die E-Mails vom jeweiligen Absender zu exportieren und die Excel-Datei im vorgegebenen Zielordner zu speichern.
  5. Nach Abschluss des Exports können Sie den Zielordner öffnen und überprüfen.

Befreien Sie sich flexibel von Outlook-Problemen

Aufgrund der Tatsache, dass Outlook für verschiedene Fehler anfällig ist, wird empfohlen, ein starkes zu behalten Outlook beheben Werkzeug in der Nähe, wie z DataNumen Outlook Repair. In diesem Fall können Sie zur Behebung der kleinen Fehler einfach die Datei Scanpst.exe verwenden. Bei schwerwiegenden Problemen können Sie jedoch auf das robustere Tool zurückgreifen.

Einführung des Autors:

Shirley Zhang ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich beschädigt SQL Server und Outlook-Reparatursoftwareprodukte. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX

Jetzt teilen:

Kommentare sind geschlossen.