Hoe een datumkiezer in e-mails in Outlook invoegen?

Stel dat u een werkschema naar uw collega's moet sturen, waarbij u op verschillende data verschillende taken aan verschillende mensen moet toewijzen. U maakt zich echter zorgen over het maken van fouten bij het handmatig invoeren van de datum, dus in plaats daarvan heeft u een datumkiezer nodig. Deze zelfstudie biedt een methode om u te helpen een datumkiezer in e-mails in Outlook in te voegen.

Voeg een datumkiezer in E-mails in Outlook in met VBA-code

U kunt de volgende VBA-code uitvoeren om een ​​datumkiezer in Outlook-e-mails in te voegen. Volg de onderstaande instructies.

1. Start uw Outlook, druk op de anders + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.

2. Dubbelklik in het linkerdeelvenster Project1 > Microsoft Outlook-objecten > DezeOutlookSessie, en kopieer vervolgens de volgende VBA-code naar de ThisOutlookSession (code) venster.

VBA-code: datumkiezer in Outlook-e-mails invoegen

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

Opmerking: In de code kunt u "MMMM d, jjjj” naar het gewenste datumformaat.

3. Blijf in de Microsoft Visual Basic voor toepassingen venster klikt Toolbox > Referenties.

4. In de Referenties – Project1 dialoogvenster, controleer de Microsoft Word 16.0-objectbibliotheek selectievakje en klik op OK om de wijzigingen op te slaan.

5. druk de anders + Q toetsen om de Microsoft Visual Basic voor toepassingen venster.

6. In de E-mailadres weergave, klikt u op het nieuwe e-mail knop onder de Home tabblad om een ​​nieuwe e-mail te maken.

7. In de Bericht venster, klikt u op de Pas de werkbalk Snelle toegang aan En selecteer Meer opdrachten uit het vervolgkeuzemenu. Zie screenshot:

8. In de Outlook Opties venster, moet u als volgt configureren.

8.1) Kies Macro's functie in het Kies commando uit keuzelijst;

8.2) Selecteer het script dat u hierboven hebt gemaakt in het linkervak ​​met opdrachten;

8.3) Klik op de Toevoegen knop.

8.4) Houd het script geselecteerd in het rechtervak ​​en klik vervolgens op de wijzigen knop. In de Knop wijzigen dialoogvenster, wijs een nieuwe knop toe aan het script en klik op OK.

8.5) Klik op OK functie in het Outlook Opties venster om de wijzigingen op te slaan.

Het VBA-script is nu toegevoegd aan de Snelle toegangswerkbalk en weergegeven als het pictogram dat u hebt opgegeven.

Vanaf nu kunt u bij het opstellen van een e-mail op het datumkiezerpictogram op de Snelle toegangswerkbalk om een ​​datumkiezer in de hoofdtekst van de e-mail in te voegen en selecteer er vervolgens een gewenste datum uit. Zie de volgende demo.

Opmerkingen:

Kutools voor Outlook - Brengt 100 geavanceerde functies naar Outlook en maakt het werk veel gemakkelijker!

• Auto CC / BCC volgens regels bij het verzenden van e-mail; Automatisch doorsturen Meerdere e-mails op maat; Auto antwoord zonder uitwisselingsserver, en meer automatische functies ...
• BCC-waarschuwing - toon bericht wanneer u alle probeert te beantwoorden als uw e-mailadres in de BCC-lijst staat; Herinner bij ontbrekende bijlagen, en meer herinneren functies ...
• Beantwoorden (alle) met alle bijlagen in het e-mailgesprek; Beantwoord veel e-mails in seconden; Begroeting automatisch toevoegen wanneer antwoord; Datum toevoegen aan onderwerp ...
• Hulpmiddelen voor bijlagen: beheer alle bijlagen in alle e-mails, Automatisch loskoppelen, Alles comprimeren, Alles hernoemen, Alles opslaan ... Snel rapport, Tel geselecteerde e-mails...
• Krachtige ongewenste e-mails op maat; Verwijder dubbele e-mails en contacten... Stel u in staat om slimmer, sneller en beter te doen in Outlook.

Lees verder... Download nu...