Passer au contenu principal

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

Auteur : Siluvia Dernière modification: 2024-05-09

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. Launch your Outlook, press the autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
  2. In the left pane, double click 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: In the code, you can change "MMMM j, aaaa" to the date format you need.
  3. Rester 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. Appuyez sur la touche 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.
    1. Selectionnez Macros dans les Choisissez la commande de la liste déroulante;
    2. Select the script you created above in the left commands box;
    3. Cliquez Ajouter .
    4. Keep the script selected in the right box, and then click the modifier bouton. dans le Modifier le bouton boîte de dialogue, affectez un nouveau bouton au script et cliquez sur D'ACCORD.
    5. Cliquez OK dans les Options d'Outlook fenêtre pour enregistrer les modifications.
  9. 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.
  10. 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:
  • You can insert multiple date pickers into the body of an email.
  • You can change the date you have selected: click on the date field to display the Date control, then select a new date as needed.
  • This date picker can also be inserted into the body of an appointment or a task. If you need to, create a new appointment or task and repeat the step 7-8 above to achieve it.
  • If you restart Outlook and find that the script does not run. That's because the macro was disabled. You need to follow the steps below to re-enable the macro:
    1. Cliquez sur Déposez votre dernière attestation > Options Pour entrer dans le Options d'Outlook fenêtre.
    2. Cliquez sur Trust Center > Paramètres du Centre.
    3. Dans le Trust Center fenêtre, cliquez sur le Paramètres de macro onglet, sélectionnez la Activer toutes les macros option, et cliquez OK > OK pour enregistrer les nouveaux paramètres.
    4. Restart Outlook once more.

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 (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
WHEN I CLOSE THE OUTLOOK AND RESTAR THIS IS NOT WORKING, WHY? CAN YOU HELP
This comment was minimized by the moderator on the site
Hi,

I'm very sorry, this issue occurred because macros were disabled after restarting Outlook. Please follow these steps to re-enable macros:
Click on File > Options to enter the Outlook Options window, click on Trust Center > Trust Center Settings, in the Trust Center window, click on the Macro Settings tab, select the Enable all macros option, and click OK to save the new settings. Please restart Outlook once more, and the issue should be resolved.
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