Jak automaticky nastavit dnešek jako datum zahájení nového úkolu v Outlooku

Sdílej nyní:

Pokud při vytváření nového úkolu v Outlooku často potřebujete nastavit dnešní datum jako datum jeho zahájení, měli byste chtít, aby jej Outlook automaticky provedl. Tento článek se na tento požadavek podíváme a poskytneme vám jednoduchý postup.

Ve výchozím nastavení se po kliknutí na tlačítko Vytvořit nový úkol v Outlooku zobrazí „Datum zahájení“ nastavené na „Žádné“, jak je znázorněno na následujícím obrázku. Často jste však zvyklí nastavovat datum zahájení na aktuální datum. Proto musíte datum v poli „Datum zahájení“ zadat nebo vybrat ručně. V takovém případě můžete doufat, že Outlook automaticky nastaví dnešní datum jako datum zahájení nového úkolu. I když taková přímá funkce neexistuje, stále ji můžete získat pomocí níže uvedeného sdíleného kódu VBA. Pokud nejste s VBA obeznámeni, podívejte se prosím na „Jak spustit kód VBA ve vašem Outlooku“Mezitím.

Výchozí datum zahájení „Žádné“

Automatické nastavení dneška jako data zahájení nové úlohy

  1. Nejprve spusťte aplikaci Outlook.
  2. Poté stisknutím kombinace kláves „Alt + F11“ spusťte editor Outlook VBA.
  3. Dále zkopírujte následující kód do projektu „ThisOutlookSession“.
Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objTask As Outlook.TaskItem

Private Sub Application_Startup()
    Set objInspectors = Outlook.Application.Inspectors
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeOf Inspector.CurrentItem Is TaskItem Then
       Set objTask = Inspector.CurrentItem
    End If
End Sub

Private Sub objTask_Open(Cancel As Boolean)
    'When opening a fresh new task item
    If Len(objTask.Subject) = 0 And Len(objTask.Body) = 0 And objTask.startDate = #1/1/4501# And objTask.DueDate = #1/1/4501# Then
 
       'Set start date to today
       objTask.startDate = Date
    End If
End Sub

Kód VBA - Automatické přednastavení dneška jako data zahájení nového úkolu

  1. Poté přesuňte kurzor na první podprogram „Application_Startup“.
  2. Později stiskněte klávesu „F5“.
  3. Od té doby Outlook pokaždé, když vytvoříte nový úkol, automaticky nastaví datum zahájení na aktuální datum, konkrétně dnes, jak je znázorněno na následujícím obrázku.Automatické nastavení dneška jako počátečního data

Dejte si pozor na škodlivá makra v aplikaci Outlook

Ačkoli makro VBA přináší uživatelům mnoho pohodlí a možností, vede také k mnoha potenciálním rizikům. Pokud například nastavíte nastavení makra tak, aby umožňovala všechna makra bez upozornění, když do vaší poštovní schránky dorazí e-mail se škodlivými makry a otevřete jeho vložené odkazy, váš datový soubor aplikace Outlook má tendenci být napaden viry. V té době musíte zabít viry a pokusit se Oprava aplikace OutlookVestavěný nástroj Scanpst si s tímto úkolem většinou neporadí. Měli byste proto použít robustnější utilitu, například DataNumen Outlook Repair.

Ú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ě zotavení sql a výhledové softwarové produkty pro opravy. Pro více informací navštivte www.datanumen.com

Sdílej nyní:

Komentáře jsou uzavřeny.