Időnként, amikor sok címzettet tartalmazó e-mailt küld vagy fogad, érdemes lehet kapcsolati csoportot létrehozni ezeknek a címzetteknek. Ez a cikk egy gyors módszert mutat be az Outlook VBA segítségével.
Korábbi cikkünkben "Kapcsolattartó csoport létrehozása a címzettlistából", megtanultunk egy általános módszert az e-mail címzettek kapcsolati csoportjának létrehozására. Ez azt jelenti, hogy először válassza ki és másolja ki a címzetteket az e-mailekből, majd hozzon létre manuálisan egy kapcsolati csoportot, és illessze be a címzetteket a „Tagok ->” mezőbe. Nyilvánvaló, hogy ez az eszköz rendkívül nehézkes. Ezért itt egy másik megközelítést mutatunk be, amely az Outlook VBA segítségével gyorsan létrehoz egy új kapcsolattartó csoportot. Egyszerűen megnyomhat egy gombot anélkül, hogy ismételten másolni és beillesztenie kellene. Olvassa el a részletes lépéseket és a VBA-kódokat.
Hozzon létre egy kapcsolattartó csoportot egy e-mail címzettlistájából
- Kezdésként az Outlookban a „Fejlesztő” fülre kell kattintani.
- Ezután ezen a lapon megkeresheti és rákattinthat a „Visual Basic” gombra.
- Ezt követően megnyílik egy új „Microsoft Visual Basic for Applications” ablak. Most meg kell nyitnia egy új modult a „Beszúrás” > „Modul” gombra kattintva.
- Ezután az új modul ablakában a következő kódokat másolhatja be és illessze be.
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
- Később kiléphet a jelenlegi „Visual Basic” ablakból, és folytathatja az új makró hozzáadását a Gyorselérési eszköztárhoz. Kattintson a lefelé mutató nyílra a Gyorselérési eszköztáron, és válassza a „További parancsok” lehetőséget a legördülő listából.
- Ezt követően megjelenik az „Outlook beállításai” ablak. Ezen a ponton meg kell tennie a következő lépéseket:
- Először állítsa be a „Parancsok kiválasztása” lehetőséget „Makrók” értékre.
- Ezután keresse meg és állítsa be a korábban hozzáadott makrót.
- Ezután kattintson a középen található „Hozzáadás” gombra.
- Végül nyomja meg az „OK” gombot.
- Ezt követően visszatérhet az Outlook levelezési ablaktáblájába, és kipróbálhatja.
- Eleinte bármely levélmappában egy e-mailt küldhet be.
- Ezután kattintson a gombra a Gyorselérési eszköztárban, az alábbi képhez hasonlóan:
- Ezután egy üzenetablak fog megjelenni, amelyben meg kell adnia az új kapcsolattartó csoport nevét.
- Később kattintson az „OK” gombra. Egyszerre megnyílik az új kapcsolattartó csoport, amely az összes kiválasztott e-mail címzettet tartalmazza. A mentéshez kattintson a „Mentés és bezárás” gombra.
Az Outlook Data Protection kötelező elemei
Tekintettel arra, hogy az Outlook sebezhető, megfelelő óvintézkedéseket kell tennie az Outlook-adatok védelme érdekében. Először is, rendszeres biztonsági mentést kell készítenie az Outlook adatairól. Ezenkívül tudnia kell, hogyan találhatja meg és futtassa a beépített javítóeszközt, a Scanpst.exe-t. Az utolsó, de nem utolsósorban szükségszerűség egy csillagszerű külső sérült Outlook adatjavító eszköz, Mint például a DataNumen Outlook Repair, amely segít, ha a biztonsági mentés és a Scanpst.exe sem sikerül.
Szerző Bevezetés:
Shirley Zhang adat-helyreállítási szakértő DataNumen, Inc., amely világelső az adat-helyreállítási technológiák területén, beleértve javítás SQL Server mdf adatbázis hiba és outlook javítószoftver termékek. További információért látogasson el www.datanumen.com