Timesամանակ առ ժամանակ, երբ շատ հասցեատերերի հետ նամակ եք ուղարկում կամ ստանում, կարող եք ցանկանալ ստեղծել կապ ստացողների հետ: Այս հոդվածը կներկայացնի այն Outlook VBA- ի միջոցով իրականացնելու արագ միջոց:
Մեր նախորդ հոդվածում «Ինչպես ստեղծել կոնտակտային խումբ ստացողների ցուցակից”, Մենք սովորել ենք էլ. Փոստ ստացողների համար կոնտակտային խումբ ստեղծելու ընդհանուր մեթոդ: Այսինքն ՝ նախ ընտրեք և պատճենեք ստացողներին էլ-նամակներից, այնուհետև ձեռքով ստեղծեք կոնտակտների խումբ և ստացողներին կպցրեք «Անդամներ ->» դաշտում: Ակնհայտ է, որ սա նշանակում է չափազանց բարդ: Հետևաբար, այստեղ մենք կներկայացնենք մեկ այլ մոտեցում, որը կօգտագործի Outlook VBA- ն արագորեն ձեռք բերելու նոր շփման խումբ: Դուք կարող եք պարզապես սեղմել կոճակը, առանց կրկնվող պատճենելու և տեղադրելու անհրաժեշտության: Կարդացեք շարունակությունը ՝ մանրամասն քայլերն ու VBA կոդերը ստանալու համար:
Էլ.փոստի ստացողների ցուցակից ստեղծեք կապի խումբ
- Սկսելու համար Outlook-ում պետք է բացել «Մշակող» բաժինը։
- Ապա այս ներդիրի տակ կարող եք գտնել և կտտացնել «Visual Basic» կոճակին:
- Դրանից հետո կբացվի նոր «Microsoft Visual Basic հավելվածների համար»: Այժմ դուք պետք է բացեք նոր մոդուլ ՝ կտտացնելով «Տեղադրել»> «Մոդուլ»:
- Հաջորդը ՝ նոր մոդուլի պատուհանում, կարող եք պատճենել և տեղադրել դրա մեջ հետևյալ կոդերը:
Sub createcontactgroupforrecipients()
Dim obApp As Application
Dim olSel As Selection
Dim obj As Object
Dim oMail As MailItem
Dim tempMail As MailItem
Dim Recips As Recipients
Dim ConGroup As DistListItem
Dim strName As String
Set obApp = Outlook.Application
Set olSel = obApp.ActiveExplorer.Selection
For Each obj In olSel
If obj.Class = olMail Then
Set oMail = obj
Set tempMail = oMail.ReplyAll
Set Recips = tempMail.Recipients
Set ConGroup = obApp.CreateItem(olDistributionListItem)
strName = InputBox("Specify a name for the new contact group:")
With ConGroup
.AddMembers Recips
.DLName = strName
'Use ".Save" to directly save the new contact group
.Display
End With
tempMail.Close olDiscard
End If
Next
End Sub
- Ավելի ուշ կարող եք դուրս գալ ներկայիս «Visual Basic» պատուհանից և շարունակել ավելացնել նոր մակրոը Արագ մուտքի գործիքագոտում: Արագ մատչելիության գործիքագոտում կտտացրեք ներքևի սլաքի վրա և իր իջնող ցուցակից ընտրեք «Լրացուցիչ հրամաններ»:
- Դրանից հետո դուք կմտնեք «Outlook Ընտրանքներ» պատուհանը: Այս պահին անհրաժեշտ է կատարել հետևյալ քայլերը.
- Նախ `« Ընտրիր հրամաններ »-ից սահմանիր« Մակրոներ »:
- Դրանից հետո որոնեք և դուրս հանեք նախկինում ավելացված մակրոը:
- Հաջորդը կտտացրեք կենտրոնում գտնվող «Ավելացնել» կոճակին:
- Վերջապես սեղմեք «OK» կոճակը:
- Դրանից հետո կարող եք վերադառնալ ձեր Outlook փոստի պատուհանը և փորձել:
- Սկզբում կարող եք ցանկացած փոստի ցանկացած թղթապանակում տեղադրել մեկ նամակ:
- Դրանից հետո կտտացրեք Արագ մուտքի Գործիքադարակի կոճակին, ինչպես ներքևում գտնվող պատկերն է.
- Եվ հաջորդը դուք կստանաք հաղորդագրության տուփ, որը պահանջում է, որ դուք նշեք անուն նոր կոնտակտային խմբի համար:
- Ավելի ուշ կտտացրեք «OK» կոճակին: Միանգամից կբացվի նոր կոնտակտային խումբը, որը պարունակում է բոլոր ընտրված էլ. Փոստի հասցեատերերը: Այն փրկելու համար կարող եք հարվածել «Փրկել և փակել»:
Outlook- ի տվյալների պաշտպանության մեջ պարտադիր պայմաններ
Հաշվի առնելով այն հանգամանքը, որ Outlook- ը խոցելի է, դուք պետք է բավարար նախազգուշական միջոցներ ձեռնարկեք `պաշտպանելու նրանց Outlook տվյալները: Նախևառաջ, դուք պետք է կատարեք Outlook- ի տվյալների կրկնօրինակում: Բացի այդ, դուք պետք է իմանաք, թե ինչպես պարզել և գործարկել ներկառուցված վերանորոգման գործիքը ՝ Scanpst.exe: Վերջին, բայց ոչ պակաս անհրաժեշտությունը աստղային արտաքինն է կոռումպացված Outlook տվյալների վերականգնման գործիք, Օրինակ, DataNumen Outlook Repair, որը ձեզ կօգնի, եթե կրկնօրինակը և Scanpst.exe- ը ձախողվեն:
Հեղինակի ներածություն.
Shirley Zhang- ը տվյալների վերականգման փորձագետ է DataNumen, Inc., որը տվյալների վերականգման տեխնոլոգիաների համաշխարհային առաջատարն է, այդ թվում նորոգում SQL Server mdf տվյալների շտեմարանի սխալ և հեռանկարների նորոգման ծրագրակազմի արտադրանքները: Լրացուցիչ տեղեկությունների համար այցելեք www.datanumen.com