Czasami, gdy wysyłasz lub odbierasz wiadomość e-mail do wielu odbiorców, możesz chcieć utworzyć grupę kontaktów dla tych odbiorców. W tym artykule przedstawiamy szybki sposób osiągnięcia tego za pomocą programu Outlook VBA.
W naszym poprzednim artykule „Jak utworzyć grupę kontaktów z listy odbiorców”, Poznaliśmy powszechną metodę tworzenia grupy kontaktów dla odbiorców wiadomości e-mail. Oznacza to, że najpierw wybierz i skopiuj odbiorców z wiadomości e-mail, a następnie ręcznie utwórz grupę kontaktów i wklej odbiorców w polu „Członkowie ->”. Oczywiście oznacza to niezwykle uciążliwe. Dlatego tutaj przedstawimy inne podejście, które wykorzysta Outlook VBA do szybkiego uzyskania nowej grupy kontaktów. Możesz po prostu nacisnąć przycisk bez konieczności wielokrotnego kopiowania i wklejania. Czytaj dalej, aby uzyskać szczegółowe instrukcje i kody VBA.
Utwórz grupę kontaktów z listy odbiorców wiadomości e-mail
- Na początek należy przejść do zakładki „Deweloper” w programie Outlook.
- Następnie w tej zakładce możesz zlokalizować i kliknąć przycisk „Visual Basic”.
- Następnie otworzy się nowe okno „Microsoft Visual Basic for Applications”. Teraz powinieneś otworzyć nowy moduł, klikając „Wstaw”> „Moduł”.
- Następnie w nowym oknie modułu możesz skopiować i wkleić do niego następujące kody.
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
- Później możesz opuścić bieżące okno „Visual Basic” i przystąpić do dodawania nowego makra do paska narzędzi szybkiego dostępu. Kliknij strzałkę w dół na pasku narzędzi szybkiego dostępu i wybierz „Więcej poleceń” z rozwijanej listy.
- Następnie przejdziesz do okna „Opcje programu Outlook”. W tym momencie musisz wykonać następujące czynności:
- Najpierw ustaw „Wybierz polecenia z” na „Makra”.
- Następnie odszukaj i odłóż wcześniej dodane makro.
- Następnie kliknij przycisk „Dodaj” pośrodku.
- Na koniec naciśnij przycisk „OK”.
- Następnie możesz wrócić do okienka poczty programu Outlook i spróbować.
- Na początku możesz łączyć jedną wiadomość w dowolnym folderze poczty.
- Następnie kliknij przycisk na pasku narzędzi szybkiego dostępu, jak na poniższym obrazku:
- Następnie otrzymasz okno komunikatu, w którym należy podać nazwę nowej grupy kontaktów.
- Później kliknij przycisk „OK”. Od razu otworzy się nowa grupa kontaktów, która zawiera wszystkich wybranych odbiorców wiadomości e-mail. Możesz nacisnąć „Zapisz i zamknij”, aby go zapisać.
Niezbędne elementy ochrony danych programu Outlook
Ze względu na to, że program Outlook jest podatny na zagrożenia, należy podjąć odpowiednie środki ostrożności, aby zabezpieczyć dane programu Outlook. Po pierwsze, należy regularnie wykonywać kopie zapasowe danych programu Outlook. Ponadto musisz wiedzieć, jak znaleźć i uruchomić wbudowane narzędzie naprawcze Scanpst.exe. Ostatnią, ale nie mniej ważną koniecznością jest gwiezdny wygląd zewnętrzny uszkodzone narzędzie do naprawy danych programu Outlook, Takie jak DataNumen Outlook Repair, który przyjdzie Ci na ratunek, jeśli zarówno kopia zapasowa, jak i program Scanpst.exe nie powiodą się.
Wprowadzenie autora:
Shirley Zhang jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym naprawa SQL Server Błąd bazy danych mdf i oprogramowanie do naprawy programu Outlook. po więcej informacji odwiedź www.datanumen.com