Passer au contenu principal

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 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 dans 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 dans 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:

1) Vous pouvez insérer plusieurs sélecteurs de date dans le corps d'un e-mail.
2) Vous pouvez modifier la date que vous avez sélectionnée : cliquez sur le champ de la date pour afficher le champ Date, puis sélectionnez une nouvelle date si nécessaire.
3) Ce sélecteur de date peut également être inséré dans le corps d'un rendez-vous ou d'une tâche. Si nécessaire, créez un nouveau rendez-vous ou une nouvelle tâche et répétez les étapes 7-8 ci-dessus pour y parvenir.

Meilleurs outils de productivité bureautique

Kutools for Outlook - Plus de 100 fonctionnalités puissantes pour booster votre Outlook

🤖 Assistant de messagerie IA: E-mails professionnels instantanés avec la magie de l'IA : un clic pour des réponses géniales, un ton parfait, une maîtrise multilingue. Transformez l’emailing sans effort ! ...

📧 Email Automation: Absent du bureau (disponible pour POP et IMAP)  /  Programmer l'envoi d'e-mails  /  Auto CC/BCC par règles lors de l'envoi d'un e-mail  /  Transfert automatique (règles avancées)   /  Ajouter un message d'accueil automatique   /  Divisez automatiquement les e-mails multi-destinataires en messages individuels 

(I.e. Email Management: Rappel facile des e-mails  /  Bloquer les e-mails frauduleux par sujets et autres  /  Supprimer les e-mails en double  /  Recherche Avancée  /  Consolider les dossiers 

(I.e. Pièces jointes ProSauvegarde par lots  /  Détachement par lots  /  Compression par lots  /  Enregistrement automatique   /  Détachement automatique  /  Compression automatique 

???? Magie de l'interface: 😊Plus d'émojis jolis et cool   /  Boostez votre productivité Outlook avec des vues à onglets  /  Réduire Outlook au lieu de fermer 

???? Merveilles en un clic: Répondre à tous avec les pièces jointes entrantes  /   E-mails anti-hameçonnage  /  🕘Afficher le fuseau horaire de l'expéditeur 

👩🏼‍🤝‍👩🏻 Contacts et calendrier: Ajouter par lots des contacts à partir des e-mails sélectionnés  /  Diviser un groupe de contacts en groupes individuels  /  Supprimer les rappels d'anniversaire 

infos Caractéristiques 100 Attendez votre exploration ! Cliquez ici pour en savoir plus.

 

 

Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hello. Very clear instructions, thank you.
When I attempt to use the macro, I get this error:
"Compile error: User defined type not defined."
Sub DatePicker() and xDoc As Document are highlighted.
Any ideas on how to fix it please?
This comment was minimized by the moderator on the site
Hi Dave,

To solve this problem, please follow the instruction of step 3 and 4 to enable the Microsoft Word 16.0 Object Library option in the Microsoft Visual Basic for Applications window.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/outlook-word-referece-vba.png?1711618070
This comment was minimized by the moderator on the site
This was exactly what I was looking for. Thank you!!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations