Občas, keď odosielate alebo prijímate e-mail s mnohými príjemcami, môžete vytvoriť skupinu kontaktov pre týchto príjemcov. Tento článok predstaví rýchly spôsob, ako to dosiahnuť pomocou aplikácie Outlook VBA.
V našom predchádzajúcom článku „Ako vytvoriť kontaktnú skupinu zo zoznamu príjemcov”, Sme sa naučili bežnú metódu na vytvorenie skupiny kontaktov pre príjemcov e-mailov. To znamená najskôr vybrať a skopírovať príjemcov z e-mailov, potom vytvoriť skupinu kontaktov manuálne a vložiť príjemcov do poľa „Členovia ->“. Je zrejmé, že to znamená, že je mimoriadne ťažkopádne. Preto tu predstavíme ďalší prístup, ktorý využije Outlook VBA na rýchle získanie novej kontaktnej skupiny. Stačí stlačiť tlačidlo a nemusíte opakovane kopírovať a vkladať. Čítajte ďalej a získate zložité kroky a kódy VBA.
Vytvorte skupinu kontaktov zo zoznamu príjemcov e-mailu
- Najprv by ste mali v programe Outlook prejsť na kartu „Vývojár“.
- Na tejto karte potom môžete nájsť a kliknúť na tlačidlo „Visual Basic“.
- Potom sa otvorí nové okno „Microsoft Visual Basic for Applications“. Teraz by ste mali otvoriť nový modul kliknutím na „Vložiť“> „Modul“.

- Ďalej v novom okne modulu môžete skopírovať a prilepiť nasledujúce kódy.
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
- Neskôr môžete opustiť súčasné okno „Visual Basic“ a pokračovať pridaním nového makra na panel nástrojov Rýchly prístup. Kliknite na šípku nadol na paneli s nástrojmi Rýchly prístup a v rozbaľovacom zozname zvoľte možnosť „Viac príkazov“.
- Následne sa dostanete do okna „Možnosti programu Outlook“. V tomto okamihu musíte vykonať nasledujúce kroky:
- Najskôr nastavte možnosť „Vybrať príkazy z“ na „Makrá“.
- Potom vyhľadajte a vyčnievajte predtým pridané makro.
- Ďalej kliknite na tlačidlo „Pridať“ v strede.
- Nakoniec stlačte tlačidlo „OK“.
- Potom sa môžete vrátiť na svoje poštové pole Outlook a vyskúšať.
- Najskôr môžete umiestniť jednu poštu do ľubovoľného priečinka s poštou.
- Potom kliknite na tlačidlo na paneli s nástrojmi Rýchly prístup, napríklad na obrázku nižšie:
- Ďalej dostanete správu, ktorá vyžaduje zadanie názvu novej skupiny kontaktov.
- Neskôr kliknite na tlačidlo „OK“. Okamžite sa otvorí nová skupina kontaktov, ktorá obsahuje všetkých vybratých príjemcov e-mailov. Stlačením tlačidla „Uložiť a zavrieť“ to uložíte.
Nevyhnutné v ochrane údajov programu Outlook
Vzhľadom na to, že je program Outlook zraniteľný, mali by ste vykonať dostatočné preventívne opatrenia na zabezpečenie ich údajov v programe Outlook. Najskôr by ste si mali pravidelne zálohovať dáta z Outlooku. Okrem toho potrebujete vedieť, ako zistiť a spustiť vstavaný nástroj na opravu Scanpst.exe. V neposlednom rade je nevyhnutnosťou hviezdny zovňajšok poškodený nástroj na opravu údajov programu Outlook, Ako sú DataNumen Outlook Repair, ktoré vám pomôžu, ak zlyhajú zálohy aj Scanpst.exe.
Úvod autora:
Shirley Zhang je expertkou na obnovu dát v DataNumen, Inc., ktorá je svetovým lídrom v oblasti technológií obnovy dát, vrátane oprava SQL Server chyba mdf databázy a výhľadové softvérové produkty na opravu. Pre viac informácií navštívte www.datanumen. S




