2 Metode Cepat untuk Menggabungkan Beberapa Tugas menjadi Satu di Outlook Anda

Bagikan sekarang:

Terkadang, Anda mungkin perlu menggabungkan beberapa tugas menjadi satu tugas. Dalam tugas baru, isi tugas tersebut berisi semua isi dari semua tugas sumber dan tanggal mulai adalah tanggal paling awal di antara semua tanggal tugas, dan seterusnya. Nah, artikel ini akan mengajarkan Anda 2 cara.

Saat menangani beberapa tugas Outlook yang saling berkaitan, Anda mungkin ingin menggabungkannya langsung menjadi satu tugas. Tugas gabungan yang baru harus mencakup semua isi tugas sumber dan menggunakan tanggal paling awal di antara semua tanggal sebagai tanggal mulai dan tanggal paling akhir sebagai tanggal jatuh tempo, dan seterusnya. Nah, berikut ini akan kami jelaskan 2 cara untuk mendapatkannya dengan cepat.

Metode 1: Gabungkan Beberapa Tugas Secara Manual

  1. Pertama-tama, buat tugas baru.
  2. Kemudian, di tugas baru, putar ke tab "Sisipkan" dan klik tombol "Item Outlook".
  3. Selanjutnya, di jendela popup, pilih tugas yang ingin Anda gabungkan.
  4. Dan kemudian pilih opsi "Teks saja" di kotak "Sisipkan sebagai".Sisipkan Tugas sebagai Teks Saja
  5. Setelah itu klik tombol “OK”.
  6. Nantinya, informasi tugas akan dimasukkan ke dalam badan tugas baru.
  7. Sekarang, Anda perlu mencari tanggal paling awal dan terbaru secara manual di antara semua tanggal di badan.
  8. Selanjutnya, ubah tanggal mulai dan tanggal jatuh tempo tugas saat ini.Ubah Tanggal Mulai dan Tanggal Jatuh Tempo Secara Manual
  9. Terakhir, simpan tugas ini seperti biasa.

Metode 1 akan cukup merepotkan saat menetapkan tanggal mulai dan tanggal jatuh tempo tugas yang digabungkan karena Anda harus secara manual mencari tanggal paling awal dan paling akhir. Pada Metode 2, Anda dapat sepenuhnya menghilangkan kesulitan ini.

Metode 2: Gabungkan Beberapa Tugas melalui VBA

  1. Sebagai langkah awal, jalankan editor VBA Outlook sesuai dengan “Cara Menjalankan Kode VBA di Outlook Anda".
  2. Kemudian, tambahkan referensi ke “MS Excel Object Library” dengan membaca “Cara Menambahkan Referensi Pustaka Objek di VBA".
  3. Nanti, salin kode berikut ke dalam modul.
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

Kode VBA - Gabungkan Beberapa Tugas menjadi Satu

  1. Berikutnya, tambahkan makro ini ke pita atau Bilah Alat Akses Cepat.
  2. Akhirnya, Anda bisa mencobanya.
  • Pertama, pilih tugas yang akan digabungkan.
  • Kemudian, klik tombol makro.Gabungkan Beberapa Tugas melalui VBA
  • Seketika itu juga, tugas baru akan ditampilkan, yang berisi seluruh isi tugas asli dan menggunakan tanggal paling awal sebagai tanggal mulai, serta tanggal paling akhir sebagai tanggal jatuh tempo, seperti yang ditunjukkan pada tangkapan layar berikut.Tugas Gabungan dari Beberapa Tugas

Bersikeras Membuat Backup PST Reguler

Jika Anda tidak ingin kehilangan data Outlook Anda yang berharga, disarankan untuk membuat cadangan rutin untuk file PST Outlook Anda. Hanya dengan cara ini, bila menderita korupsi PST, Anda bisa terbebas dari kesulitan Perbaikan PST, yang dapat dicapai hanya melalui alat yang canggih, seperti DataNumen Outlook Repair.

Pengantar Penulis:

Shirley Zhang adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk memperbaiki sql dan produk perangkat lunak perbaikan pandangan. Untuk informasi lebih lanjut kunjungi www.datanumen.com

Bagikan sekarang:

Komentar ditutup.