Jak automatycznie ustawić dzień dzisiejszy jako datę rozpoczęcia nowego zadania w programie Outlook

Podziel się teraz:

Tworząc nowe zadanie w Outlooku i często ustawiając dzisiejszą datę rozpoczęcia, musisz zezwolić programowi Outlook na automatyczne wykonywanie zadania. W tym artykule przyjrzymy się temu wymogowi, aby przedstawić prostą metodę.

Domyślnie po kliknięciu przycisku „Utwórz nowe zadanie” w programie Outlook, zadanie będzie wyświetlane z polem „Data rozpoczęcia” ustawionym na „Brak”, jak pokazano na poniższym rysunku. Jednak najczęściej przyzwyczajeni jesteśmy do ustawiania daty rozpoczęcia na bieżącą datę. W związku z tym musimy ręcznie wprowadzić lub wybrać datę w polu „Data rozpoczęcia”. W takiej sytuacji warto mieć nadzieję, że program Outlook automatycznie ustawi dzień dzisiejszy jako datę rozpoczęcia nowego zadania. Chociaż nie ma takiej bezpośredniej funkcji, nadal można ją uzyskać za pomocą udostępnionego kodu VBA. Jeśli nie znasz języka VBA, zapoznaj się z artykułem „Jak uruchomić kod VBA w swoim Outlooku" W międzyczasie.

Domyślna data rozpoczęcia „Brak”

Automatyczne ustawianie daty rozpoczęcia nowego zadania na dziś

  1. Na początek uruchom aplikację Outlook.
  2. Następnie naciśnij „Alt + F11”, aby uruchomić edytor VBA programu Outlook.
  3. Następnie skopiuj następujący kod 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

Kod VBA – automatyczne ustawianie dnia dzisiejszego jako daty rozpoczęcia nowego zadania

  1. Następnie przesuń kursor do pierwszej podprocedury „Application_Startup”.
  2. Później naciśnij klawisz „F5”.
  3. Od tej pory za każdym razem, gdy tworzysz nowe zadanie, program Outlook automatycznie ustawia datę rozpoczęcia na bieżącą datę, czyli na dzień dzisiejszy, jak pokazano na poniższym obrazku.Automatyczne ustawienie daty rozpoczęcia na dziś

Uważaj na złośliwe makra w Outlooku

Chociaż makro VBA zapewnia użytkownikom dużą wygodę i możliwości, wiąże się również z wieloma potencjalnymi zagrożeniami. Na przykład, jeśli ustawisz ustawienia makr tak, aby zezwalały na wszystkie makra bez powiadomienia, gdy wiadomość e-mail ze złośliwymi makrami pojawi się w Twojej skrzynce pocztowej i otworzysz jej osadzone łącza, plik danych programu Outlook jest zwykle atakowany przez wirusy. W tym czasie musisz zabić wirusy i spróbować Naprawa programu OutlookW większości przypadków wbudowane narzędzie Scanpst nie jest w stanie sprostać temu zadaniu. Dlatego należy skorzystać z bardziej zaawansowanego narzędzia, takiego jak DataNumen Outlook Repair.

Wprowadzenie autora:

Shirley Zhang jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym odzyskiwanie sql i oprogramowanie do naprawy programu Outlook. po więcej informacji odwiedź www.datanumen.com

Podziel się teraz:

Możliwość dodawania komentarzy nie jest dostępna.