Noen ganger må du kanskje slå sammen flere oppgaver til én enkelt oppgave. I den nye oppgaven inneholder brødteksten alle brødtekstene til alle kildeoppgavene, og startdatoen er den tidligste datoen blant alle datoene for oppgavene, og så videre. Denne artikkelen vil lære deg to måter.
Når du har flere Outlook-oppgaver som er korrelerte med hverandre, kan det være lurt å slå dem sammen direkte til én oppgave. Den nye sammenslåtte oppgaven bør inkludere alle kildeoppgavenes innhold og bruke den tidligste datoen blant alle datoer som startdato og siste dato som forfallsdato, og så videre. Nå, i det følgende, vil vi introdusere to måter å raskt få tak i det på.
Metode 1: Slå sammen flere oppgaver manuelt
- For det første, opprett en ny oppgave.
- Gå deretter til "Sett inn"-fanen i den nye oppgaven og klikk på "Outlook-elementer" -knappen.
- Deretter velger du oppgavene du vil slå sammen i popup-vinduet.
- Og velg deretter alternativet "Kun tekst" i "Sett inn som"-boksen.

- Etter det klikker du på "OK"-knappen.
- Senere vil informasjonen om oppgavene bli satt inn i den nye oppgavens kropp.
- Nå må du manuelt finne den tidligste og siste datoen blant alle datoer i kroppen.
- Deretter endrer du start- og forfallsdatoen for gjeldende oppgave.
- Til slutt lagrer du denne oppgaven som vanlig.
Metode 1 vil være ganske problematisk når du skal angi startdato og forfallsdato for den sammenslåtte oppgaven, siden du manuelt må finne den tidligste og siste datoen. Med metode 2 kan du bli kvitt dette problemet fullstendig.
Metode 2: Slå sammen flere oppgaver via VBA
- For å begynne, start Outlook VBA-editoren i henhold til «Hvordan kjøre VBA-kode i Outlook".
- Legg deretter til en referanse til «MS Excel Object Library» ved å lese «Slik legger du til en objektbibliotekreferanse i VBA".
- Senere kopierer du følgende kode inn i en 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
- Deretter legger du til denne makroen til hurtigtilgangsverktøylinjen eller båndet.
- Endelig kan du prøve.
- Først velger du oppgavene som skal slås sammen.
- Klikk deretter på makroknappen.
- Det vises umiddelbart en ny oppgave. Den har alle de opprinnelige oppgavenes innhold i oppgaven, og bruker den tidligste datoen som startdato og siste dato som forfallsdato, som vist på skjermbildet nedenfor.
Insister på å lage vanlige PST-sikkerhetskopier
Hvis du ikke vil miste dine verdifulle Outlook-data, anbefales det å ta regelmessige sikkerhetskopier av Outlook PST-filene dine. Bare på denne måten, når du lider av PST-korrupsjon, kan du bli kvitt vanskelig PST reparasjon, som kun kan oppnås via et robust verktøy, som f.eks DataNumen Outlook Repair.
Forfatterintroduksjon:
Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert reparere sql og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med



