Salt la conținutul principal

Cum să inserați un selector de date în e-mailuri în Outlook?

Să presupunem că trebuie să trimiteți un program de lucru colegilor dvs., atribuind diferite sarcini unor persoane diferite la date diferite. Cu toate acestea, ești îngrijorat să faci greșeli la introducerea manuală a datei, așa că ai nevoie de un selector de date. Acest tutorial oferă o metodă pentru a vă ajuta să introduceți un selector de date în e-mailuri în Outlook.


Introduceți un selector de date în E-mailuri în Outlook cu cod VBA

Puteți rula următorul cod VBA pentru a insera un selector de date în e-mailurile Outlook. Vă rugăm să urmați instrucțiunile de mai jos.

1. Lansați Outlook, apăsați butonul Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În panoul din stânga, faceți dublu clic Project1 > Obiecte Microsoft Outlook > Această sesiune Outlook, și apoi copiați următorul cod VBA în ThisOutlookSession (Cod) fereastră.

Cod VBA: introduceți selectorul de date în e-mailurile 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

Notă: În cod, puteți schimba „MMMM d, aaaa” la formatul de dată de care aveți nevoie.

3. Stai în Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Instrumente > Referințe.

4. În Referințe – Proiect1 caseta de dialog, verificați Biblioteca de obiecte Microsoft Word 16.0 caseta de selectare și faceți clic pe OK pentru a salva modificările.

5. apasă pe Alt + Q tastele pentru a închide Microsoft Visual Basic pentru aplicații fereastră.

6. În Mail vizualizare, faceți clic pe Email nou buton sub Acasă pentru a crea un e-mail nou.

7. În Mesaj fereastra, faceți clic pe Personalizați bara de instrumente cu acces rapid buton , Și apoi selectați Mai multe comenzi din meniul derulant. Vedeți captura de ecran:

8. În Opțiuni Outlook fereastră, trebuie să configurați după cum urmează.

8.1) Alegeți Macrocomenzi în Alege comanda din lista verticală;
8.2) Selectați scriptul creat mai sus în caseta de comenzi din stânga;
8.3) Faceți clic pe Adăuga butonul.
8.4) Păstrați scriptul selectat în caseta din dreapta, apoi faceți clic pe Modifica buton. În Buton Modificare caseta de dialog, atribuiți un nou buton scriptului și faceți clic OK.
8.5) Faceți clic pe OK în Opțiuni Outlook fereastra pentru a salva modificările.

Scriptul VBA este acum adăugat la Bara de instrumente pentru acces rapid și afișat ca pictogramă specificată de dvs.

De acum înainte, atunci când compuneți un e-mail, puteți face clic pe pictograma selector de date de pe Bara de instrumente pentru acces rapid pentru a insera un selector de date în corpul e-mailului, apoi selectați din acesta data de care aveți nevoie. Vedeți următorul demo.

note:

1) Puteți introduce mai multe selecționare de date în corpul unui e-mail.
2) Puteți schimba data pe care ați selectat-o: faceți clic pe câmpul de dată pentru a afișa controlul Data, apoi selectați o nouă dată după cum este necesar.
3) Acest selector de date poate fi inserat și în corpul unei întâlniri sau al unei sarcini. Dacă este necesar, creați o nouă întâlnire sau sarcină și repetați pasul 7-8 de mai sus pentru a o realiza.

Cele mai bune instrumente de productivitate de birou

Kutools pentru Outlook - Peste 100 de funcții puternice pentru a vă supraalimenta Outlook

🤖 AI Mail Assistant: E-mailuri profesionale instantanee cu magie AI--un singur clic pentru răspunsuri geniale, ton perfect, stăpânire în mai multe limbi. Transformați e-mailurile fără efort! ...

📧 Automatizare e-mail: În afara biroului (disponibil pentru POP și IMAP)  /  Programați trimiterea de e-mailuri  /  CC/BCC automat după reguli la trimiterea e-mailului  /  Redirecționare automată (Reguli avansate)   /  Adăugare automată felicitare   /  Împărțiți automat e-mailurile cu mai mulți destinatari în mesaje individuale ...

📨 Managementul e-mail: Amintește-ți cu ușurință e-mailurile  /  Blocați e-mailurile înșelătorii de către subiecți și alții  /  Ștergeți e-mailurile duplicate  /  Cautare Avansata  /  Consolidați foldere ...

📁 Atașamente ProSalvați în serie  /  Detașare lot  /  Compresă în loturi  /  Salvare automata   /  Detașare automată  /  Comprimare automată ...

🌟 Magia interfeței: 😊Mai multe emoji drăguțe și cool   /  Îmbunătățiți-vă productivitatea Outlook cu vizualizările cu file  /  Minimizați Outlook în loc să închideți ...

???? Minuni cu un singur clic: Răspundeți tuturor cu atașamentele primite  /   E-mailuri anti-phishing  /  🕘Afișați fusul orar al expeditorului ...

👩🏼‍🤝‍👩🏻 Contacte și calendar: Adăugați în lot contacte din e-mailurile selectate  /  Împărțiți un grup de contact în grupuri individuale  /  Eliminați mementouri de ziua de naștere ...

Peste 100 Caracteristici Așteaptă explorarea ta! Click aici pentru a descoperi mai multe.

 

 

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