Comment définir automatiquement la date du jour comme date de début d'une nouvelle tâche dans Outlook ?

Partage maintenant:

Lors de la création d'une nouvelle tâche dans Outlook, si vous devez fréquemment définir la date de début au jour même, vous pouvez configurer Outlook pour qu'il le fasse automatiquement. Cet article vous propose une méthode simple pour répondre à ce besoin.

Par défaut, lorsque vous cliquez sur « Créer une tâche » dans Outlook, la date de début est définie sur « Aucune », comme illustré ci-dessous. Cependant, vous avez souvent l'habitude de définir la date de début sur la date du jour. Vous devez donc saisir ou sélectionner manuellement la date dans le champ « Date de début ». Dans ce cas, vous pourriez souhaiter qu'Outlook définisse automatiquement la date du jour comme date de début de la nouvelle tâche. Bien qu'il n'existe pas de fonction directe pour cela, vous pouvez y parvenir grâce au code VBA présenté ci-après. Si vous n'êtes pas familier avec VBA, veuillez consulter…Comment exécuter le code VBA dans votre Outlook" entre-temps.

Date de début par défaut « Aucune »

Définir automatiquement la date du jour comme date de début d'une nouvelle tâche

  1. Pour commencer, lancez votre application Outlook.
  2. Ensuite, appuyez sur "Alt + F11" pour déclencher l'éditeur Outlook VBA.
  3. Ensuite, copiez le code suivant dans le projet "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

Code VBA - Définir automatiquement la date du jour comme date de début d'une nouvelle tâche

  1. Ensuite, déplacez le curseur sur la première sous-routine « Application_Startup ».
  2. Plus tard, appuyez sur la touche "F5".
  3. Depuis, chaque fois que vous créez une nouvelle tâche, Outlook définit automatiquement la date de début sur la date actuelle, c'est-à-dire aujourd'hui, comme le montre l'image suivante.Préréglage automatique : aujourd’hui comme date de début

Méfiez-vous des macros malveillantes dans Outlook

Bien que la macro VBA apporte beaucoup de commodité et de possibilités aux utilisateurs, elle entraîne également de nombreux risques potentiels. Par exemple, si vous définissez vos paramètres de macro pour autoriser toutes les macros sans notification, lorsqu'un e-mail contenant des macros malveillantes arrive dans votre boîte aux lettres et que vous ouvrez ses liens intégrés, votre fichier de données Outlook a tendance à être attaqué par des virus. À ce moment-là, vous devez tuer les virus et tenter Réparation OutlookLa plupart du temps, l'outil intégré Scanpst ne suffit pas pour cette tâche. Il est donc conseillé d'utiliser un utilitaire plus performant, tel que… DataNumen Outlook Repair.

Introduction de l'auteur:

Shirley Zhang est une experte en récupération de données dans DataNumen, Inc., qui est le leader mondial des technologies de récupération de données, y compris récupération SQL et produits logiciels de réparation Outlook. Pour plus d'informations, visitez www.datanumen.com

Partage maintenant:

Les commentaires sont fermés.