Тодорхой илгээгчийн бүх имэйлийг Excel файл руу экспортлох 2 арга

Хэрэв та тодорхой илгээгчийн имэйлийг Excel файл руу хурдан экспортлохыг хүсвэл энэ нийтлэлд оруулсан дараах 2 аргыг ашиглаж болно.

Зарим шалтгааны улмаас, тухайлбал хураангуй бичих гэх мэт зарим шалтгааны улмаас та тодорхой илгээгчээс ирсэн имэйл гэх мэт тодорхой имэйлийг Excel файл руу экспортлох шаардлагатай болж магадгүй юм. Экспорт хийх тухайд ихэнх хэрэглэгчдийн толгойд "экспортлох" гэсэн үндсэн функц гарч ирнэ. Гэхдээ үнэнийг хэлэхэд Outlook VBA ашиглах нь уламжлалт "Экспортлох" функцээс хамаагүй илүү хялбар байх болно. Одоо бид хоёр аргыг дэлгэрэнгүй танилцуулах болно.

Арга 1: "Экспортлох" функцийг ашигла

1. Хамгийн эхэнд Outlook програмаа ажиллуулна уу.
2. Дараа нь имэйлийн жагсаалт дахь хайлтын талбар дээр дарж "Хайлтын хэрэгсэл" туузыг идэвхжүүлнэ.
3. Туузан дээрх "Хаанаас" товчийг дарна уу.
4. Дараа нь "илгээгчийн нэр" тэмдэгтийг тодорхой илгээгчийн нэрээр солино.
5. Үүний дараа зөвхөн тодорхой илгээгчийн имэйлүүд жагсаалтад харагдах болно. Одоо бүгдийг нь сонгохын тулд “Ctrl + A” товчийг дарна уу.
6. Дараа нь хулганы баруун товчийг дараад "Зөөх"> "Бусад фолдер" -ыг сонгоно уу.
7. Дараа нь, "Зүйлийг шилжүүлэх" харилцах цонхонд шинэ хавтас үүсгээд энэ имэйлийг сонгоод тодорхой имэйлийг шилжүүлэх.
8. Үүний дараа та "Файл"> "Нээх"> "Импорт" руу орж болно.
9. Дараа нь дараахь харилцах цонхноос 'Файл руу экспорт хийх>> "Дараагийн"> "Microsoft Excel 97 - 2003"> "Дараах" командыг сонгоно уу.
10. Дараа нь тухайн илгээгчийн имэйлийг хадгалж байгаа тодорхой фолдерыг сонгоод "Next" дээр дарна уу.
11. Дараа нь "үзэх" дээр дарж Excel файлыг сонгох эсвэл шинэ Excel файл үүсгэх боломжтой.
12. Дараа нь "Дараа нь"> "Дуусгах" дээр дарна уу.
13. Эцэст нь Outlook экспортлохоор ажиллах болно. Экспортын процесс дууссаны дараа та энэ Excel файлыг олж нээх боломжтой.

Арга 2: Outlook VBA ашиглах

1. Эхний ээлжинд “Alt + F11” товчлууруудыг дарна уу.
2. Дараа нь гарч ирэх цонхонд шинэ модуль нээгээд дараахь кодыг хуулж ав.

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. Дараа нь хэрэгслийн самбар дээрх "Ажиллуулах" дүрс дээр дарна уу.
4. Үүний дараа танаас тодорхой илгээгчийн нэрийг оруулах шаардлагатай болно.
5. Дараа нь “OK” дээр дарна уу.
6. Outlook нь тухайн илгээгчээс ирсэн имэйлийг экспортлож эхлэх бөгөөд Excel файлыг урьдчилан тодорхойлсон очих хавтсанд хадгалах болно.
7. Экспорт хийж дууссаны дараа та очих хавтас руу орж нээгээд шалгаж болно.

Outlook-ийн асуудлуудаас уян хатан байдлаас ангижрах

Outlook нь янз бүрийн алдаанд өртөмтгий тул хүчтэй байлгахыг зөвлөж байна Outlook засах гэх мэт ойр орчмын хэрэгсэл DataNumen Outlook Repair. Энэ тохиолдолд жижиг алдааг арилгахын тулд та зүгээр л Scanpst.exe ашиглаж болно. Гэхдээ ноцтой бэрхшээлийн хувьд та илүү хүчирхэг хэрэгслийг ашиглаж болно.

Зохиогчийн танилцуулга:

Ширли Жан бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. гэмтсэн SQL Server програм хангамжийн бүтээгдэхүүнийг засах хэтийн төлөв. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com