Кейде бірнеше тапсырманы бір тапсырмаға біріктіру қажет болуы мүмкін. Жаңа тапсырмада негізгі мәтін барлық бастапқы тапсырмалардың барлық негізгі мәтіндерін қамтиды және басталу күні - тапсырмалардың барлық күндерінің ішіндегі ең ерте күн және т.б. Енді бұл мақала сізге 2 жолды үйретеді.
Бір-бірімен өзара байланысты бірнеше Outlook тапсырмаларымен жұмыс істеген кезде, оларды тікелей бір тапсырмаға біріктіру қажет болуы мүмкін. Ал жаңа біріктірілген тапсырма барлық бастапқы тапсырмалардың негізгі бөліктерін қамтуы керек және барлық күндер арасындағы ең ерте күнді басталу күні ретінде, ал ең соңғы күнді аяқтау күні ретінде және т.б. пайдаланады. Енді, төменде біз оны тез алудың 2 әдісін ұсынамыз.
1-әдіс: Бірнеше тапсырмаларды қолмен біріктіру
- Біріншіден, жаңа тапсырма жасаңыз.
- Содан кейін, жаңа тапсырмада «Кірістіру» қойындысына өтіп, «Outlook элементтері» түймесін басыңыз.
- Әрі қарай, қалқымалы терезеде біріктіргіңіз келетін тапсырмаларды таңдаңыз.
- Содан кейін «Кірістіру» жолағында «Тек мәтін» опциясын таңдаңыз.

- Осыдан кейін «ОК» батырмасын басыңыз.
- Кейінірек тапсырмалар туралы ақпарат жаңа тапсырманың негізгі бөлігіне енгізіледі.
- Енді денедегі барлық күндердің ішінен ең ерте және соңғы күнді қолмен табу керек.
- Келесіде, ағымдағы тапсырманың басталу және аяқталу күнін өзгертіңіз.
- Соңында, бұл тапсырманы әдеттегідей сақтаңыз.
1-әдіс біріктірілген тапсырманың басталу күні мен аяқталу күнін орнату кезінде өте қиын болады, себебі ең ерте және ең соңғы күнді қолмен табу керек. 2-әдіс арқылы бұл қиындықтан толығымен құтылуға болады.
2-әдіс: VBA арқылы бірнеше тапсырмаларды біріктіру
- Бастау үшін Outlook VBA редакторын «Outlook бағдарламасында VBA кодын қалай іске қосуға болады«.
- Содан кейін, «MS Excel нысандар кітапханасына» сілтемені «» деп оқу арқылы қосыңыз.VBA бағдарламасында объект кітапханасына сілтемені қалай қосуға болады«.
- Кейінірек келесі кодты модульге көшіріңіз.
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
- Әрі қарай, бұл макросты жылдам қол жетімді құралдар тақтасына немесе таспаға қосыңыз.
- Соңында, сіз көріңіз.
- Алдымен біріктірілетін тапсырмаларды таңдаңыз.
- Содан кейін, макро батырманы басыңыз.
- Бірден жаңа тапсырма көрсетіледі, онда барлық бастапқы тапсырмалардың негізгі мәтіндері болады және келесі скриншотта көрсетілгендей, басталу күні ретінде ең ерте күнді, аяқталу күні ретінде ең соңғы күнді пайдаланады.
Тұрақты PST сақтық көшірмелерін жасауды талап етіңіз
Құнды Outlook деректерін жоғалтқыңыз келмесе, Outlook PST файлдарының тұрақты сақтық көшірмелерін жасау ұсынылады. Тек осылайша, PST сыбайлас жемқорлықтан зардап шеккенде, сіз қиыннан құтыла аласыз PST жөндеу, оны тек сенімді құрал арқылы орындауға болады, мысалы DataNumen Outlook Repair.
Автордың кіріспесі:
Ширли Чжан - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. жөндеу кв және бағдарламалық жасақтаманы жөндеу бағдарламалары. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com



