Ինչպես ավտոմատ կերպով ներդնել ընթացիկ ամսաթիվը կամ ժամանակը էլփոստի թեմայի կամ մարմնի մեջ Outlook VBA- ի միջոցով

Բազմաթիվ օգտվողներ սովոր են ներմուծել ընթացիկ ամսաթիվը կամ ժամանակը էլփոստի թեմայի կամ մարմնի մեջ նոր էլփոստ կազմելիս: Այս հոդվածը կսովորեցնի ձեզ, թե ինչպես արագ դրան հասնել:

Նախորդ post - "Ինչպես ավտոմատ ավելացնել ընթացիկ ամսաթիվը ձեր Outlook էլփոստի առարկաներին”, Դուք կարող եք իմանալ, թե ինչպես ավտոմատ կերպով ավելացնել թեմային ընթացիկ ամսաթիվը կամ ժամանակը: Բայց մեթոդը այդ post պարզապես հաղորդագրության պատվերով ձև ստեղծելն է: Այսպիսով, այդ միջոցով, ամեն անգամ, երբ ցանկանում եք ստեղծել նոր էլփոստ ՝ ընթացիկ ամսաթվով կամ ժամի թեմայով, դուք պետք է ընտրեք ընտրովի ձևը, այլ ոչ թե ստեղծեք սովորական էլ. Ակնհայտ է, որ դա բավականին բարդ է:

Իրականում, Outlook- ն արդեն առաջարկել է մեզ հարազատ դաշտ ՝ ամսաթիվը կամ ժամանակը տեղադրելու համար: Բացի այդ, դուք կարող եք կիրառել Outlook VBA ՝ ընթացիկ ամսաթիվը կամ ժամանակը ավտոմատ կերպով տեղադրելու համար նոր էլփոստի մարմնում կամ թեմայում: Ինչ վերաբերում է ընտրելու որ մեթոդին, ապա դա կախված է նրանից, թե որքան հաճախ պետք է տեղադրեք ամսաթիվը կամ ժամը:

Ձեռքով տեղադրեք «Ամսաթիվ և ժամ» դաշտի միջոցով

1. Սtarհետ, գործարկել Outlook.
2. Դրանից հետո ստեղծեք նոր հաղորդագրություն ՝ «Տուն» ներդիրի տակ սեղմելով «Նոր էլ. Փոստ» կոճակը «Նոր» խմբում:
3. Դրանից հետո Նոր հաղորդագրության պատուհանում կարող եք սեղմել էլփոստի մարմինը և անցնել «Տեղադրել» ներդիրին:
4. Հաջորդը «Տեքստ» խմբում կարող եք գտնել և սեղմել «Ամսաթիվ և ժամ» դաշտը:
5. Դրանից հետո կհայտնվի նոր երկխոսության տուփ: Կարող եք ընտրել մատչելի ձևաչափ և այնուհետև կտտացնել «OK» կոճակին:
6. Հաղորդագրության պատուհան վերադառնալուց հետո էլփոստի մարմնում կարող եք տեսնել ընթացիկ ամսաթիվը կամ ժամանակը: Լռելյայն, Outlook- ը թույլ չի տալիս առարկայի վրա կիրառել «Ամսաթիվ և ժամ» դաշտը:
7. Ուստի, վերջապես, եթե ցանկանում եք տեղադրել թեմայի ամսաթիվը կամ ժամանակը, ապա պետք է դրանք պատճենեք մարմնից և ձեռքով կպցրեք թեմային:

Այս մեթոդը ավելի շատ առաջարկվում է, եթե հազվադեպ եք անհրաժեշտ ներմուծում ներկայիս ամսաթիվը կամ ժամանակը: Բայց պայմանով, որ դուք հաճախ կամ միշտ պետք է տեղադրեք, ավելի լավ է օգտագործեք հետևյալ VBA կոդերը ՝ դրան ավտոմատ կերպով հասնելու համար:

Ավտոմատ տեղադրեք Outlook VBA- ով

1. Առաջին հերթին, սեղմեք «Alt + F11» ստեղնային կոճակները VBA խմբագիր մուտք գործելու համար:
2. Դրանից հետո կրկնակի կտտացրեք ձախ կողմում գտնվող «ThisOutlookSession» նախագիծը ՝ այն բացելու համար:
3. Հաջորդը պատճենեք հետևյալ ծածկագրերը դրանում:

Public WithEvents objInspectors As Inspectors
Public WithEvents objMail As MailItem

Private Sub Initialize_handlers()
    Set objInspectors = Application.Inspectors
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeOf Inspector.CurrentItem Is MailItem Then
       Set objMail = Inspector.CurrentItem
    End If
End Sub

Private Sub objMail_Open(Cancel As Boolean)
    Dim strTime As String
 
    'the current time
    strTime = Now
 
    'insert to subject
    'If you don't want to insert to subject, remove the following line
    objMail.Subject = strTime
    'insert to body
    'If you don't want to insert to body, remove the following line
    objMail.Body = strTime & objMail.Body
End Sub

Նշում: Վերոնշյալ կոդերը կաշխատեն ընթացիկ ժամանակը ավտոմատ կերպով ներմուծել առարկան և մարմինը: Եթե ​​ցանկանում եք տեղադրել ընթացիկ ամսաթիվը, փոխարինեք «objMail_Open»Ենթակետը հետևյալով.

Private Sub objMail_Open(Cancel As Boolean)
    Dim strDate As String
 
    'the current date
    strDate = Date
 
    'insert to subject
    objMail.Subject = strDate
    'insert to body
    objMail.Body = strDate & objMail.Body
End Sub

4. Դրանից հետո, ինչպես միշտ, ստորագրեք այս կոդը:
5. Հետագայում, ռեսtart Մակրո ակտիվացնելու համար Outlook:
6. Վերջապես կարող եք փորձել:

• Ուղղակիորեն կտտացրեք «Նոր էլ. Փոստ» կոճակին ՝ նոր էլ-նամակ բացելու համար:
• Դուք կտեսնեք, որ նոր էլփոստի ավտոմատը պարունակում է ընթացիկ ամսաթիվը կամ ժամանակը թեմայի և մարմնի մեջ, ինչպես ստորև նկարը.

Մի անհապաղ վստահեք անհայտ նամակներին

Դուք հավանաբար երբևէ ստացել եք անպիտան նամակներ: Սովորաբար ինչպե՞ս եք վերաբերվում նրանց: Անթույլատրելի է ներբեռնել հավելվածներ կամ բաց հղումներ այս տեսակի նամակներում, քանի որ դրանք կարող են վիրուսներ պարունակել: Երբ ձեր Outlook տվյալները վարակվեն, մուտքի արկղի վերականգնման գործիքը, Scanpst.exe- ն էֆեկտ չի թողնի: Այս պարագայում ձեզ այլ բան չի մնում, քան դիմել ավելի փորձառուին PST շտկում գործիք, ինչպիսիք են DataNumen Outlook Repair.

Հեղինակի ներածություն.

Shirley Zhang- ը տվյալների վերականգման փորձագետ է DataNumen, Inc., որը տվյալների վերականգման տեխնոլոգիաների համաշխարհային առաջատարն է, այդ թվում կոռումպացված SQL Server և հեռանկարների նորոգման ծրագրակազմի արտադրանքները: Լրացուցիչ տեղեկությունների համար այցելեք www.datanumen.com