Как да зададете автоматично днес като начална дата на нова задача във вашия Outlook

Споделете сега:

Когато създавате нова задача в Outlook, ако често се налага да задавате днешната дата като нейна начална дата, трябва да искате Outlook да я изпълнява автоматично. Тази статия ще разгледа това изискване, за да предостави лесен метод.

По подразбиране, когато щракнете върху „създаване на нова задача“ в Outlook, задачата ще се покаже с „Начална дата“, зададена на „Няма“, както е показано на следващата фигура. В повечето случаи обаче сте свикнали да задавате началната дата на текущата дата. Така че трябва ръчно да въведете или изберете датата в полето „Начална дата“. В такъв случай може да се надявате, че Outlook автоматично ще зададе днес като начална дата на новата задача. Въпреки че няма такава директна функция, все още можете да я получите чрез споделения VBA код по-долу. Ако не сте запознати с VBA, моля, вижте „Как да стартирате VBA код във вашия Outlook”Междувременно.

Начална дата по подразбиране „Няма“

Автоматично задаване на днешната дата като начална дата на нова задача

  1. Като начало стартирайте приложението си Outlook.
  2. След това натиснете „Alt + F11“, за да задействате редактора на Outlook VBA.
  3. След това копирайте следния код в проекта „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

VBA код - Автоматично предварително задаване на днес като начална дата на нова задача

  1. След това преместете курсора до първата подпрограма „Application_Startup“.
  2. По-късно натиснете бутона „F5“.
  3. Оттогава, всеки път, когато създавате нова задача, Outlook автоматично ще задава началната дата на текущата дата, а именно днес, както е показано на следващото изображение.Автоматично предварително задаване на днешната дата като начална дата

Пазете се от зловредни макроси в Outlook

Въпреки че макросът на VBA носи много удобства и възможности за потребителите, той води и до много потенциални рискове. Например, ако зададете настройките на вашите макроси да разрешават всички макроси без известие, когато в пощенската ви кутия пристигне имейл със злонамерени макроси и отворите вградените връзки, вашият файл с данни в Outlook има тенденция да бъде атакуван от вируси. По това време трябва да убиете вирусите и да опитате Поправка на OutlookВ повечето случаи вграденият инструмент Scanpst не може да се справи с тази задача. Така че трябва да използвате по-мощна програма, като например DataNumen Outlook Repair.

Въведение на автора:

Шърли Джанг е експерт по възстановяване на данни в DataNumen, Inc., която е световен лидер в технологиите за възстановяване на данни, включително sql възстановяване и outlook софтуерни продукти за ремонт. За повече информация посетете WWW.datanumen.com

Споделете сега:

Коментарите са забранени.