2 Αποτελεσματικές μέθοδοι για τη μετατροπή ενός Outlook Outlook σε έγγραφο του Word

Εάν θέλετε να αποθηκεύσετε ή να μετατρέψετε ένα email του Outlook σε έγγραφο λέξης, μπορείτε να χρησιμοποιήσετε τις 2 μεθόδους που εισάγονται σε αυτό το άρθρο.

Το Outlook δεν προσφέρει εγγενείς δυνατότητες για αποθήκευση ή μετατροπή ενός email του Outlook ως εγγράφου λέξεων. Επομένως, εάν θέλετε να το επιτύχετε, πρέπει να κάνετε κάποιες επιπλέον προσπάθειες. Εδώ θα σας διδάξουμε 2 γρήγορες μεθόδους. Το ένα είναι να χρησιμοποιήσετε έξυπνα τη λειτουργία "Αποθήκευση". Το άλλο είναι να χρησιμοποιήσετε με προσοχή το Outlook VBA. Διαβάστε παρακάτω για να τα δείτε αναλυτικά.

Μέθοδος 1: Χρησιμοποιήστε τη λειτουργία "Αποθήκευση"

1. Για να ξεκινήσετε, ξεκινήστε το πρόγραμμα Outlook.
2. Στη συνέχεια, στείλτε ένα email.
3. Στη συνέχεια, μεταβείτε στο μενού "Αρχείο" και επιλέξτε "Αποθήκευση ως".
4. Στη συνέχεια, στο αναδυόμενο παράθυρο διαλόγου, επιλέξτε έναν φάκελο προορισμού και επιλέξτε "Μόνο κείμενο" στο πεδίο "Αποθήκευση ως τύπος".
5. Αφού κάνετε κλικ στο κουμπί "Αποθήκευση", μπορείτε να ανοίξετε την εφαρμογή Microsoft Word.
6. Στο MS Word, μεταβείτε στο μενού "Αρχείο" και επιλέξτε "Άνοιγμα".
7. Στο αναδυόμενο παράθυρο διαλόγου "Άνοιγμα", επιλέξτε "Όλα τα αρχεία" στη γραμμή "Όνομα αρχείου" και προωθήστε το αρχείο κειμένου που είχε αποθηκευτεί προηγουμένως.
8. Αφού κάνετε κλικ στο "Άνοιγμα", το email σε τύπο αρχείου κειμένου θα ανοίξει με λέξη.
9. Αργότερα μπορείτε να επιλέξετε "Αρχείο"> "Αποθήκευση ως".
10. Τέλος στο παράθυρο διαλόγου "Αποθήκευση ως", επιλέξτε "Έγγραφο Word" στο "Αποθήκευση ως τύπος" και πατήστε "Αποθήκευση".

Μέθοδος 2: Χρησιμοποιήστε το Outlook VBA

1. Πρώτα, πατήστε "Alt + F11" συντομεύσεις πλήκτρων στο Outlook.
2. Στη συνέχεια, στο αναδυόμενο παράθυρο του προγράμματος επεξεργασίας του Outlook VBA, ανοίξτε μια νέα ενότητα.
3. Στη συνέχεια αντιγράψτε και επικολλήστε τους ακόλουθους κωδικούς VBA σε αυτό.

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

4. Στη συνέχεια, προσθέστε το νέο έργο VBA στη Γραμμή εργαλείων γρήγορης πρόσβασης.
5. Μετά από αυτό, επιλέξτε ένα email και κάντε κλικ στο κουμπί μακροεντολής στη Γραμμή εργαλείων γρήγορης πρόσβασης.
6. Θα εμφανιστεί ταυτόχρονα ένα έγγραφο του Word με περιεχόμενο email.
7. Τέλος, μπορείτε να αποθηκεύσετε το νέο αναδυόμενο έγγραφο Word ως συνήθως.

Απορρίψτε αποτελεσματικά τα ενοχλητικά ζητήματα του Outlook

Καθώς το Outlook είναι επιρρεπές σε σφάλματα και διαφθορά, πρέπει να καταβάλλετε περισσότερες προσπάθειες για την προστασία των δεδομένων σας στο Outlook. Για παράδειγμα, πρέπει να κάνετε τακτικά αντίγραφα ασφαλείας για τα δεδομένα του Outlook. Επιπλέον, είναι συνετό να αποκτήσετε μια υπεροχή Ανάκτηση του Outlook εργαλείο, όπως DataNumen Outlook Repair, που σίγουρα θα έρθει σε πρακτική μια μέρα.

Εισαγωγή συγγραφέα:

Η Shirley Zhang είναι ειδικός ανάκτησης δεδομένων στο DataNumen, Inc., η οποία είναι ο παγκόσμιος ηγέτης στις τεχνολογίες ανάκτησης δεδομένων, συμπεριλαμβανομένων SQL Server επισκευή και προϊόντα λογισμικού επισκευής προοπτικών. Για περισσότερες πληροφορίες επισκεφθείτε www.datanumen.com