Jak rychle seskupit úkoly podle měsíce zahájení v Outlooku

Ve výchozím nastavení není pro úkoly v Outlooku k dispozici pole „Měsíc zahájení“. Pokud tedy chcete úkoly seskupit podle měsíce zahájení, měli byste hledat jiné způsoby, například metodu uvedenou v tomto článku.

Outlook umožňuje uživatelům seskupovat úkoly podle data zahájení. Protože se však data zahájení úkolů zřídka shodují, bude seznam úkolů rozdělen do mnoha skupin, což může vypadat dost nepřehledně. Proto místo „Datum zahájení“ můžete dát přednost seskupení úkolů podle měsíce data zahájení. V tomto případě můžete použít následující způsoby.

Rychlé seskupení úkolů podle měsíce zahájení

1. Hned na začátku spusťte program Outlook.
2. Poté, co vstoupíte do Outlooku, musíte stisknout klávesy „Alt + F11“.
3. Dále se dostanete do okna „Microsoft Visual Basic for Applications“, ve kterém byste měli přistupovat k modulu, který se nepoužívá.
4. Poté zkopírujte následující kód VBA do tohoto modulu.

Sub AddStartMonthColumnToTasks()
    Dim objCurrentFolder As Outlook.Folder
    Dim objTask As Outlook.TaskItem
    Dim strYear As String
    Dim strMonth As String
    Dim objProperties As Outlook.UserProperties
    Dim objProperty As Outlook.UserProperty
    Dim strPropertyName As String
 
    Set objCurrentFolder = Outlook.Application.ActiveExplorer.CurrentFolder
 
    If objCurrentFolder.Items.count > 0 Then
       For Each objTask In objCurrentFolder.Items
           strYear = Year(objTask.StartDate)
           strMonth = Month(objTask.StartDate)
 
           strPropertyName = "Start Month"
 
           Set objProperties = objTask.UserProperties
 
           Set objProperty = objProperties.Find(strPropertyName, True)
           If objProperty Is Nothing Then
              Set objProperty = objProperties.Add(strPropertyName, olText, True)
           End If
 
           objProperty.value = strMonth & "/" & strYear
           objTask.Save
       Next
    End If
End Sub

5. Později můžete minimalizovat aktuální okno.
6. Následně přejděte do oblasti „Úkoly“ a otevřete složku Úkoly.
7. Poté se stisknutím kombinace kláves „Alt + F11“ vraťte k nově přidanému makru.
8. Dále stisknutím tohoto tlačítka spusťte toto makro.
9. Po dokončení makra bude k úkolům v této složce úkolů přidáno pole „Počáteční měsíc“.
10. Nyní můžete zavřít okno „Microsoft Visual Basic for Applications“.
11. Poté byste měli provést následující kroky k seskupení úkolů podle měsíce zahájení.

• Nejprve přepněte na „Zobrazit“ v oblasti „Úkoly“.
• Poté klikněte na tlačítko „Zobrazit nastavení“.
• Dále v rozbalovacím dialogovém okně klikněte na tlačítko „Seskupit podle“.
• Následně v dalším dialogovém okně vyberte dole „Uživatelem definovaná pole ve složce“.
• Později z rozbalovacího seznamu „Seskupit položky podle“ vyberte „Počáteční měsíc“.
• Nakonec klikněte na řadu „OK“, dokud nebudou zavřena všechna dialogová okna.

12. Nakonec, po návratu do seznamu úkolů, uvidíte, že všechny úkoly byly seskupeny podle měsíce jejich zahájení, jako na obrázku níže:

Chraňte svá data aplikace Outlook

Kvůli zranitelnosti aplikace Outlook si musíte dát pozor na všechna potenciální rizika spojená s datovým souborem aplikace Outlook a přijmout některá účinná preventivní opatření. Například musíte pravidelně zálohovat data aplikace Outlook. Také proto, aby obnovit Outlook data v čase, musíte sehnat silný nástroj třetí strany, jako je DataNumen Outlook Repair. Může zkontrolovat chyby ve vašem souboru aplikace Outlook, čímž získá zpět maximum dat aplikace Outlook za vás.

Úvod autora:

Shirley Zhang je expertem na obnovu dat DataNumen, Inc., která je světovým lídrem v oblasti technologií pro obnovu dat, včetně poškozený sql a výhledové softwarové produkty pro opravy. Pro více informací navštivte www.datanumen.com