Ձեր Outlook-ում բազմաթիվ առաջադրանքները մեկ մեկի մեջ միավորելու 2 արագ մեթոդ

Outlook լուծումներ Սեպտեմբեր 29, 2025

Երբեմն կարող է անհրաժեշտ լինել մի քանի առաջադրանքներ միավորել մեկ առաջադրանքի մեջ։ Նոր առաջադրանքի մարմնում տեքստը պարունակում է բոլոր սկզբնական առաջադրանքների բոլոր մարմնավորումները, իսկ մեկնարկի ամսաթիվը առաջադրանքների բոլոր ամսաթվերի շարքում ամենավաղ ամսաթիվն է և այլն։ Այժմ, այս հոդվածը ձեզ կսովորեցնի 2 եղանակ։

Երբ գործ ունեք Outlook-ի մի քանի փոխկապակցված առաջադրանքների հետ, կարող եք դրանք ուղղակիորեն միավորել մեկ առաջադրանքի մեջ։ Եվ նոր միավորված առաջադրանքը պետք է ներառի բոլոր սկզբնական առաջադրանքների մարմինները և օգտագործի բոլոր ամսաթվերից ամենավաղ ամսաթիվը որպես մեկնարկի ամսաթիվ, իսկ ամենավերջինը որպես վերջնաժամկետ և այլն։ Այժմ, ստորև, մենք կներկայացնենք 2 միջոց՝ դա արագ ստանալու համար։

Մեթոդ 1. Միավորել բազմաթիվ առաջադրանքներ ձեռքով

Առաջին հերթին ստեղծեք նոր առաջադրանք:
Այնուհետև նոր առաջադրանքում անցեք «Տեղադրեք» ներդիրին և սեղմեք «Outlook Items» կոճակը:
Հաջորդը, բացվող պատուհանում ընտրեք այն առաջադրանքները, որոնք ցանկանում եք միավորել:
Այնուհետև ընտրեք «Միայն տեքստ» տարբերակը «Տեղադրեք որպես» վանդակում:
Դրանից հետո կտտացրեք «Լավ» կոճակին:
Հետագայում առաջադրանքների մասին տեղեկատվությունը կտեղադրվի նոր առաջադրանքի մարմնում:
Այժմ դուք պետք է ձեռքով գտնեք մարմնի բոլոր ամսաթվերի ամենավաղ և ամենավերջին ամսաթիվը:
Հաջորդը, փոխեք ընթացիկ առաջադրանքի մեկնարկի և վերջնաժամկետը։
Վերջապես, պահպանեք այս առաջադրանքը, ինչպես միշտ:

Մեթոդ 1-ը բավականին խնդրահարույց կլինի միավորված առաջադրանքի մեկնարկի և վերջնաժամկետի սահմանման ժամանակ, քանի որ դուք պետք է ձեռքով գտնեք ամենավաղ և վերջին ամսաթվերը: Մեթոդ 2-ում դուք կարող եք լիովին ազատվել այս խնդրից:

Մեթոդ 2. Միավորել բազմաթիվ առաջադրանքներ VBA-ի միջոցով

Սկսելու համար գործարկեք Outlook VBA խմբագրիչը՝ համաձայն «Ինչպես գործարկել VBA կոդը ձեր Outlook- ում".
Այնուհետև ավելացրեք հղում «MS Excel Object Library»-ին՝ կարդալով «Ինչպես ավելացնել օբյեկտային գրադարանի հղում 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.

Հեղինակի ներածություն.

Shirley Zhang- ը տվյալների վերականգման փորձագետ է DataNumen, Inc., որը տվյալների վերականգման տեխնոլոգիաների համաշխարհային առաջատարն է, այդ թվում վերանորոգել sql և հեռանկարների նորոգման ծրագրակազմի արտադրանքները: Լրացուցիչ տեղեկությունների համար այցելեք www.datanumen.com