2 Metode Efektif untuk Mengonversi Email Outlook ke Dokumen Word

Jika Anda ingin menyimpan atau mengonversi email Outlook menjadi dokumen Word, Anda dapat menggunakan 2 metode yang diperkenalkan di artikel ini.

Outlook tidak menawarkan fitur asli apa pun untuk menyimpan atau mengonversi email Outlook sebagai dokumen kata. Oleh karena itu, jika Anda ingin mencapainya, Anda harus melakukan upaya ekstra. Di sini kami akan mengajari Anda 2 metode cepat. Salah satunya adalah dengan cerdas menggunakan fitur "Simpan". Yang lainnya adalah menggunakan Outlook VBA dengan bijaksana. Silakan baca terus untuk mendapatkan mereka secara rinci.

Metode 1: Gunakan Fitur "Simpan"

1. Pertama-tama, buka program Outlook Anda.
2. Kemudian ajak email.
3. Selanjutnya giliran menu "File" dan pilih opsi "Save As".
4. Selanjutnya, di kotak dialog popup, pilih folder tujuan dan pilih "Teks Saja" di kolom "Simpan sebagai jenis".
5. Setelah mengklik tombol "Simpan", Anda dapat membuka aplikasi Microsoft Word Anda.
6. Di MS Word, buka menu "File" dan pilih "Open".
7. Dalam popup "Buka" kotak dialog, pilih "Semua File" di baris "Nama file" dan pitch pada file teks yang disimpan sebelumnya.
8. Setelah klik “Open”, email dengan tipe file teks akan terbuka dalam bentuk word.
9. Nanti Anda bisa memilih “File”> “Save As”.
10. Terakhir di kotak dialog "Save as", pilih "Word Document" dalam "Save as type" dan tekan "Save".

Metode 2: Gunakan Outlook VBA

1. Pertama-tama, tekan pintasan tombol “Alt + F11” di Outlook.
2. Kemudian di jendela editor Outlook VBA popup, buka modul baru.
3. Selanjutnya salin dan tempel kode VBA berikut ke dalamnya.

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. Selanjutnya, tambahkan proyek VBA baru ke Quick Access Toolbar.
5. Setelah itu, pilih email dan klik tombol makro di Bilah Alat Akses Cepat.
6. Sekaligus, dokumen Word dengan konten email di dalamnya akan ditampilkan.
7. Akhirnya Anda dapat menyimpan dokumen Word popup baru seperti biasa.

Buang Masalah Outlook yang Mengganggu Secara Efektif

Karena Outlook rentan terhadap kesalahan dan kerusakan, Anda perlu melakukan lebih banyak upaya untuk melindungi data Outlook Anda. Misalnya, Anda harus membuat cadangan rutin untuk data Outlook Anda. Selain itu, bijaksana untuk mendapatkan yang terbaik Pemulihan Outlook alat, seperti DataNumen Outlook Repair, yang pasti akan berguna suatu hari nanti.

Pengantar Penulis:

Shirley Zhang adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk SQL Server memperbaiki dan produk perangkat lunak perbaikan pandangan. Untuk informasi lebih lanjut kunjungi www.datanumen.com