Ndonjëherë, kur dërgoni ose merrni një email me shumë marrës, mund të dëshironi të krijoni një grup kontakti për këta marrës. Ky artikull do të prezantojë një mënyrë të shpejtë për ta realizuar atë me Outlook VBA.
Në artikullin tonë të mëparshëm "Si të krijoni një grup kontakti nga Lista e Marrësve”, ne kemi mësuar një metodë të zakonshme për të krijuar grupin e kontaktit për marrësit e emailit. Kjo do të thotë që fillimisht të zgjidhni dhe kopjoni marrësit nga emailet, dhe më pas të krijoni një grup kontakti me dorë dhe t'i ngjitni marrësit në fushën "Anëtarët ->". Natyrisht, ky mjet është jashtëzakonisht i rëndë. Prandaj, këtu do të prezantojmë një qasje tjetër, e cila do të përdorë Outlook VBA për të arritur me shpejtësi një grup të ri kontakti. Ju thjesht mund të shtypni një buton pa pasur nevojë të kopjoni dhe ngjitni në mënyrë të përsëritur. Lexoni për të marrë hapat e përpunuar dhe kodet VBA.
Krijoni një grup kontakti nga Lista e Marrësve të një Email
- Për të filluar, duhet të shkoni te skeda "Zhvillues" në Outlook.
- Pastaj nën këtë skedë, mund të gjeni dhe klikoni në butonin "Visual Basic".
- Pas kësaj, do të hapet një dritare e re "Microsoft Visual Basic për aplikacione". Tani duhet të hapni një modul të ri duke klikuar "Fut" > "Modul".

- Më pas në dritaren e modulit të ri, mund të kopjoni dhe ngjisni kodet e mëposhtme në të.
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
- Më vonë mund të dilni nga dritarja aktuale "Visual Basic" dhe të vazhdoni të shtoni makro të re në shiritin e veglave të aksesit të shpejtë. Klikoni në shigjetën poshtë në shiritin e veglave të aksesit të shpejtë dhe zgjidhni "Më shumë komanda" nga lista e tij rënëse.
- Më pas, do të futeni në dritaren "Opsionet e Outlook". Në këtë pikë, duhet të ndërmerrni hapat e mëposhtëm:
- Së pari, vendosni "Zgjidh komandat nga" në "Macros".
- Më pas kërkoni dhe nxirrni makron e shtuar më parë.
- Pastaj klikoni në butonin "Shto" në qendër.
- Së fundi shtypni butonin "OK".
- Pas kësaj, mund të ktheheni në panelin tuaj të postës së Outlook dhe të provoni.
- Në fillim, ju mund të shkruani një postë në çdo dosje postare.
- Pastaj klikoni butonin në shiritin e veglave të aksesit të shpejtë, si imazhi më poshtë:
- Dhe më pas do të merrni një kuti mesazhi, e cila ju kërkon të specifikoni një emër për grupin e ri të kontaktit.
- Më vonë klikoni në butonin "OK". Menjëherë do të hapet grupi i ri i kontaktit, i cili përmban të gjithë marrësit e zgjedhur të emailit. Mund të shtypni "Ruaj & Mbyll" për ta ruajtur.
Duhet të ketë në Mbrojtjen e të Dhënave të Outlook
Për shkak të faktit se Outlook është i cenueshëm, duhet të merrni masa paraprake të mjaftueshme për të mbrojtur të dhënat e tyre të Outlook. Së pari, duhet të bëni një kopje rezervë të rregullt të të dhënave të Outlook. Përveç kësaj, ju duhet të dini se si të zbuloni dhe ekzekutoni mjetin e integruar të riparimit, Scanpst.exe. Domosdoshmëria e fundit por jo më pak e rëndësishme është një e jashtme yjore mjet i korruptuar i riparimit të të dhënave të Outlook, Të tilla si DataNumen Outlook Repair, i cili do t'ju ndihmojë nëse kopjimi dhe Scanpst.exe dështojnë.
Hyrje e autorit:
Shirley Zhang është një eksperte për rikuperimin e të dhënave DataNumen, Inc., e cila është lider botëror në teknologjitë e rikuperimit të të dhënave, duke përfshirë riparim SQL Server Gabim i bazës së të dhënave mdf dhe produkte softuerike të riparimit të pamjes. Për më shumë informacion vizitoni www.datanumen.com




