Таны Outlook дээрх олон ажлыг нэг болгон нэгтгэх 2 хурдан арга

Заримдаа та олон даалгаврыг нэг даалгаварт нэгтгэх шаардлагатай болж магадгүй. Шинэ даалгаварт үндсэн хэсэг нь бүх эх даалгаврын бүх үндсэн хэсгийг агуулдаг бөгөөд эхлэх огноо нь даалгаврын бүх огнооны хамгийн эрт огноо гэх мэтчилэн байна. Одоо энэ нийтлэлд танд 2 аргыг заах болно.

Бие биетэйгээ хамааралтай олон Outlook даалгавруудыг шийдвэрлэхдээ та тэдгээрийг нэг даалгаварт шууд нэгтгэхийг хүсч болно. Шинээр нэгтгэсэн даалгавар нь бүх эх даалгаврын биеийг агуулсан байх ёстой бөгөөд бүх огнооны дундаас хамгийн эртний огноог эхлэх огноо, хамгийн сүүлийн огноог хугацаа гэх мэтээр ашигладаг. Одоо доор бид үүнийг хурдан авах 2 аргыг танилцуулах болно.

Арга 1: Олон даалгаврыг гараар нэгтгэх

1. Эхний ээлжинд шинэ даалгавар үүсгэ.
2. Дараа нь шинэ даалгаварт "Оруулах" таб руу эргэж, "Outlook Items" товчийг дарна уу.
3. Дараа нь гарч ирэх цонхноос нэгтгэхийг хүсч буй ажлуудаа сонгоно уу.
4. Дараа нь "Insert as" хэсэгт "Зөвхөн текст" сонголтыг сонгоно уу.
5. Үүний дараа "OK" товчийг дарна уу.
6. Дараа нь даалгаврын мэдээллийг шинэ даалгаврын биед оруулах болно.
7. Одоо та бие дэх бүх огнооноос хамгийн эртний, хамгийн сүүлийн огноог гараар олох хэрэгтэй.
8. Дараа нь, одоогийн даалгаврын эхлэх болон дуусах огноог өөрчилнө үү.
9. Эцэст нь энэ ажлыг ердийнхөөрөө хадгал.

1-р арга нь нэгтгэсэн даалгаврын эхлэх огноо болон дуусах хугацааг тохируулахад нэлээд төвөгтэй байх болно, учир нь та хамгийн эртний болон хамгийн сүүлийн огноог гараар олох шаардлагатай болно. 2-р арга нь энэ асуудлаас бүрэн ангижрах боломжтой.

Арга 2: VBA-ээр олон даалгаврыг нэгтгэх

1. Эхлээд Outlook VBA засварлагчийг "Таны Outlook дээр VBA кодыг хэрхэн ажиллуулах вэ".
2. Дараа нь "MS Excel объектын сан"-д " гэж уншаад лавлагаа нэмнэ үү.VBA дээр объектын номын сангийн лавлагааг хэрхэн нэмэх вэ".
3. Дараа нь дараах кодыг модуль болгон хуулна.

Sub MergeMultipleTasksIntoOne()
    Dim objSelection As Outlook.Selection
    Dim objMergedTask As Outlook.TaskItem
    Dim objExcelApp As Excel.Application
    Dim objExcelWorkbook As Excel.Workbook
    Dim objExcelWorksheet As Excel.Worksheet
    Dim dStartDate As Date
    Dim dDueDate As Date
 
    Set objMergedTask = Outlook.Application.CreateItem(olTaskItem)
 
    Set objExcelApp = CreateObject("Excel.Application")
    objExcelApp.Visible = True
    Set objExcelWorkbook = objExcelApp.Workbooks.Add
    Set objExcelWorksheet = objExcelWorkbook.Sheets(1)
 
    Set objSelection = Outlook.Application.ActiveExplorer.Selection
    For i = 1 To objSelection.Count
        nLastRow = objExcelWorksheet.Range("A" & objExcelWorksheet.Rows.Count).End(xlUp).Row
        objExcelWorksheet.Cells(nLastRow, 1) = objSelection(i).StartDate
        objExcelWorksheet.Cells(nLastRow + 1, 1) = objSelection(i).DueDate
 
        objMergedTask.Body = objMergedTask.Body & objSelection(i).Body & vbCrLf & vbCrLf & "==================================" & vbCrLf & vbCrLf
 
        objMergedTask.Attachments.Add objSelection(i)
    Next
 
    'Get the Min and Max Date via Excel Function
    dStartDate = objExcelApp.WorksheetFunction.Min(Columns("A"))
    dDueDate = objExcelApp.WorksheetFunction.Max(Columns("A"))
 
    objMergedTask.StartDate = CDate(dStartDate)
    objMergedTask.DueDate = CDate(dDueDate)
    objMergedTask.Display
 
    objExcelWorkbook.Close False
    objExcelApp.Quit
End Sub

4. Дараа нь энэ макроыг Quick Access Toolbar эсвэл туузанд нэмнэ үү.
5. Эцэст нь та хичээгээд үзээрэй.

• Эхлээд нэгтгэх ажлуудаа сонго.
• Дараа нь, макро товчийг дарна уу.
• Дараах дэлгэцийн агшинд үзүүлсэн шиг анхны бүх даалгаврын үндсэн хэсгүүдийг агуулсан шинэ даалгавар нэн даруй гарч ирнэ. Хамгийн эрт огноог эхлэх огноо, хамгийн сүүлийн огноог хугацаа болгон ашиглана.

Тогтмол PST нөөцлөлт хийхийг шаардах

Хэрэв та үнэ цэнэтэй Outlook мэдээллээ алдахыг хүсэхгүй байгаа бол Outlook PST файлуудаа тогтмол нөөцлөхийг зөвлөж байна. Зөвхөн ийм байдлаар л PST авлигын улмаас зовж шаналж байхдаа та хэцүү байдлаас ангижрах боломжтой PST засвар, үүнийг зөвхөн бат бөх хэрэглүүрээр хийж болно, жишээ нь DataNumen Outlook Repair.

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

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