Wenn Sie eine Outlook-E-Mail speichern oder in ein Word-Dokument konvertieren möchten, können Sie die beiden in diesem Artikel beschriebenen Methoden verwenden.
Outlook bietet keine nativen Funktionen zum Speichern oder Konvertieren einer Outlook-E-Mail als Word-Dokument. Wenn Sie dies erreichen möchten, müssen Sie daher einige zusätzliche Anstrengungen unternehmen. Hier werden wir Ihnen 2 schnelle Methoden beibringen. Eine Möglichkeit besteht darin, die Funktion „Speichern“ intelligent zu verwenden. Die andere Möglichkeit besteht darin, Outlook VBA taktvoll zu verwenden. Bitte lesen Sie weiter, um sie im Detail zu erhalten.
Methode 1: Verwenden Sie die Funktion "Speichern"
- Starten Sie zunächst Ihr Outlook-Programm.
- Dann werfen Sie eine E-Mail auf.
- Gehen Sie als nächstes zum Menü "Datei" und wählen Sie die Option "Speichern unter".
- Wählen Sie anschließend im Popup-Dialogfeld einen Zielordner aus und wählen Sie im Feld "Dateityp" die Option "Nur Text".
- Nachdem Sie auf die Schaltfläche "Speichern" geklickt haben, können Sie Ihre Microsoft Word-Anwendung öffnen.
- Wechseln Sie in MS Word zum Menü „Datei“ und wählen Sie „Öffnen“.
- Wählen Sie im Popup-Dialogfeld "Öffnen" in der Zeile "Dateiname" die Option "Alle Dateien" aus und wählen Sie die zuvor gespeicherte Textdatei aus.
- Nachdem Sie auf "Öffnen" geklickt haben, wird die E-Mail im Textdateityp in Word geöffnet.
- Später können Sie "Datei"> "Speichern unter" auswählen.
- Wählen Sie schließlich im Dialogfeld "Speichern unter" unter "Dateityp" die Option "Word-Dokument" und klicken Sie auf "Speichern".
Methode 2: Verwenden Sie Outlook VBA
- Drücken Sie zunächst in Outlook die Tastenkombinationen „Alt + F11“.
- Öffnen Sie dann im Popup-Fenster des Outlook VBA-Editors ein neues Modul.
- Kopieren Sie anschließend die folgenden VBA-Codes und fügen Sie sie ein.
Sub ConvertEmailtoWordDocument()
Dim objMail As Outlook.MailItem
Dim strMessage As String
Dim objWordApp As Word.Application
Dim objWordDocument As Word.Document
Dim objWordRange As Word.Range
Dim strFilePath, strFileName As String
Select Case Application.ActiveWindow.Class
Case olExplorer
Set objMail = ActiveExplorer.Selection.Item(1)
Case olInspector
Set objMail = ActiveInspector.CurrentItem
End Select
strMessage = "From: " & objMail.SenderName & vbCrLf & "Sent: " & objMail.SentOn & vbCrLf & "Subject: " & objMail.Subject & vbCrLf & vbCrLf & objMail.Body
'create a word document
Set objWordApp = CreateObject("Word.Application")
Set objWordDocument = objWordApp.Documents.Add
objWordDocument.Activate
Set objWordRange = objWordDocument.Range(0, 0)
'insert the email information to the document
objWordRange.Text = strMessage
'change the email contents' format
With objWordRange.Font
.Name = "Cambria"
.Color = wdColorBlack
.Size = 12
End With
'show the word document
objWordApp.Visible = True
objWordDocument.ActiveWindow.Visible = True
End Sub
- Fügen Sie anschließend das neue VBA-Projekt zur Symbolleiste für den Schnellzugriff hinzu.
- Wählen Sie anschließend eine E-Mail aus und klicken Sie in der Symbolleiste für den Schnellzugriff auf die Makroschaltfläche.
- Sofort wird ein Word-Dokument mit E-Mail-Inhalten angezeigt.
- Schließlich können Sie das neue Popup-Word-Dokument wie gewohnt speichern.
Beseitigen Sie störende Outlook-Probleme effektiv
Da Outlook fehleranfällig und korrupt ist, müssen Sie mehr Anstrengungen unternehmen, um Ihre Outlook-Daten zu schützen. Beispielsweise müssen Sie regelmäßige Sicherungen für Ihre Outlook-Daten erstellen. Darüber hinaus ist es ratsam, einen herausragenden Vertreter zu finden Outlook-Wiederherstellung Werkzeug, wie DataNumen Outlook Repair, was sich eines Tages sicherlich als nützlich erweisen wird.
Einführung des Autors:
Shirley Zhang ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich SQL Server Reparatur- und Outlook-Reparatursoftwareprodukte. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX