Outlook에서 여러 작업을 단일 작업으로 병합하는 2 가지 빠른 방법

Outlook 솔루션 2025 년 9 월 29 일

때로는 여러 작업을 단일 작업으로 병합해야 할 수도 있습니다. 새 작업에서 본문에는 모든 원본 작업의 모든 본문이 포함됩니다.tart 날짜는 작업의 모든 날짜 중에서 가장 빠른 날짜입니다. 자,이 기사는 두 가지 방법을 알려줄 것입니다.

서로 관련된 여러 Outlook 작업을 처리 할 때 하나의 작업으로 직접 병합 할 수 있습니다. 그리고 새로운 병합 작업은 모든 원본 작업의 본문을 포함해야하며 모든 날짜 중 가장 빠른 날짜를 s로 사용합니다.tart 날짜 및 최신 날짜를 기한 등으로 지정합니다. 자, 다음에서는 빠르게 얻을 수있는 두 가지 방법을 소개합니다.

방법 1 : 여러 작업을 수동으로 병합

먼저 새 작업을 만듭니다.
그런 다음 새 작업에서 "삽입"탭으로 이동하고 "Outlook 항목"버튼을 클릭합니다.
다음으로 팝업 창에서 병합 할 작업을 선택합니다.
그런 다음 "다음으로 삽입"상자에서 "텍스트 만"옵션을 선택합니다.
그 후“확인”버튼을 클릭합니다.
나중에 작업 정보가 새 작업의 본문에 삽입됩니다.
이제 본문의 모든 날짜 중에서 가장 이른 날짜와 최신 날짜를 수동으로 찾아야합니다.
다음으로 start 및 현재 작업의 기한.
마지막으로이 작업을 평소와 같이 저장합니다.

방법 1은 s를 설정할 때 매우 번거로울 것입니다.tar병합 된 작업의 날짜와 기한은 수동으로 가장 이른 날짜와 가장 늦은 날짜를 찾아야합니다. 방법 2에서는이 문제를 완전히 제거 할 수 있습니다.

방법 2 : VBA를 통해 여러 작업 병합

로tart, "에 따라 Outlook VBA 편집기를 시작합니다.Outlook에서 VBA 코드를 실행하는 방법".
그런 다음“MS Excel Object Library ""개체 라이브러리를 추가하는 방법rary 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

다음으로이 매크로를 빠른 실행 도구 모음 또는 리본에 추가합니다.
마지막으로 시도해 볼 수 있습니다.

먼저 병합 할 작업을 선택합니다.
그런 다음 매크로 버튼을 클릭합니다.
한 번에 원래 작업의 본문이 모두 본문에 있고 가장 이른 날짜를 s로 사용하는 새 작업이 표시됩니다.tar다음 스크린 샷에 표시된대로 t 날짜, 최신 날짜를 기한으로 표시합니다.

정기적 인 PST 백업을 고집하십시오.

귀중한 Outlook 데이터를 잃지 않으려면 Outlook PST 파일을 정기적으로 백업하는 것이 좋습니다. 이런 식으로 만 PST 손상으로 고통받을 때 어려운 문제를 제거 할 수 있습니다. PST 수리다음과 같은 강력한 도구를 통해서만 수행 할 수 있습니다. DataNumen Outlook Repair.

저자 소개 :

Shirley Zhang은 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. 수리 SQL 및 전망 수리 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM