Comment insérer un sélecteur de date dans les e-mails dans Outlook ?

Supposons que vous ayez besoin d'envoyer un horaire de travail à vos collègues, en attribuant différentes tâches à différentes personnes à différentes dates. Cependant, vous craignez de faire des erreurs en saisissant la date manuellement, vous avez donc besoin d'un sélecteur de date à la place. Ce didacticiel fournit une méthode pour vous aider à insérer un sélecteur de date dans les e-mails d'Outlook.

Insérer un sélecteur de date dans les e-mails dans Outlook avec le code VBA

Vous pouvez exécuter le code VBA suivant pour insérer un sélecteur de date dans les e-mails Outlook. Veuillez suivre les instructions ci-dessous.

1. Lancez votre Outlook, appuyez sur le autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. Dans le volet de gauche, double-cliquez Project1 > Objets Microsoft Outlook > Cette session Outlook, puis copiez le code VBA suivant dans le Cette session Outlook (code) fenêtre.

Code VBA : insérer un sélecteur de date dans les e-mails Outlook

Sub DatePicker()
'Updated by Extendoffice 20220615
  Dim xDoc As Document
  On Error Resume Next
  Set xDoc = Application.ActiveInspector.WordEditor
  With xDoc.Application.Selection
    .Range.ContentControls.Add (wdContentControlDate)
    .ParentContentControl.DateDisplayFormat = "MMMM d, yyyy"
    .InsertAfter Format(Now(), "MMMM d, yyyy")
    .MoveRight wdCharacter, 1
  End With
End Sub

Remarque : Dans le code, vous pouvez changer "MMMM j, aaaa” au format de date dont vous avez besoin.

3. Restez dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur outils > Les références.

4. dans le Références – Projet1 boîte de dialogue, vérifiez le Bibliothèque d'objets Microsoft Word 16.0 case à cocher et cliquez sur OK Pour enregistrer les modifications.

5. appuie sur le autre + Q touches pour fermer le Microsoft Visual Basic pour applications fenêtre.

6. dans le Courrier vue, cliquez sur le Nouveau Email bouton sous Accueil onglet pour créer un nouvel e-mail.

7. dans le Votre message fenêtre, cliquez sur le Personnaliser la barre d'outils Accès rapide bouton (dans la fenêtre de contrôle qui apparaît maintenant) , Puis sélectionnez Plus de commandes dans le menu déroulant. Voir la capture d'écran:

8. dans le Options d'Outlook fenêtre, vous devez configurer comme suit.

8.1) Choisissez Macros à l' Choisissez la commande de la liste déroulante;

8.2) Sélectionnez le script que vous avez créé ci-dessus dans la boîte de commandes de gauche ;

8.3) Cliquez sur le Ajouter .

8.4) Gardez le script sélectionné dans la case de droite, puis cliquez sur le modifier bouton. dans le Modifier le bouton boîte de dialogue, affectez un nouveau bouton au script et cliquez sur D'ACCORD.

8.5) Cliquez sur OK à l' Options d'Outlook fenêtre pour enregistrer les modifications.

Le script VBA est maintenant ajouté au Barre d'outils d'accès rapide et affiché sous l'icône que vous avez spécifiée.

Désormais, lors de la rédaction d'un e-mail, vous pouvez cliquer sur l'icône de sélection de date sur le Barre d'outils d'accès rapide pour insérer un sélecteur de date dans le corps de l'e-mail, puis sélectionnez une date dont vous avez besoin. Voir la démo suivante.

Notes:

Kutools for Outlook - Apporte 100 fonctionnalités avancées à Outlook et simplifie grandement le travail!

• CC / BCC automatique par des règles lors de l'envoi d'e-mails; Transfert automatique Emails multiples par coutume; Réponse automatique sans serveur d'échange, et plus de fonctionnalités automatiques ...
• Avertissement BCC - afficher le message lorsque vous essayez de répondre à tous si votre adresse e-mail est dans la liste BCC; Rappeler en cas de pièces jointes manquantes, et plus de fonctionnalités de rappel ...
• Répondre (à tous) avec toutes les pièces jointes dans la conversation par courrier électronique; Répondre à de nombreux e-mails en secondes; Ajouter un message d'accueil automatique quand répondre; Ajouter la date au sujet ...
• Outils de pièces jointes: gérer toutes les pièces jointes dans tous les courriers, Détachement automatique, Compresser tout, Tout renommer, Tout enregistrer ... Rapport rapide, Compter les courriers sélectionnés...
• Courriels indésirables puissants par coutume; Supprimer les messages et contacts en double... Vous permettre de faire plus intelligemment, plus rapidement et mieux dans Outlook.

Lire la suite... Télécharger maintenant...