Czasami podczas tworzenia wiadomości e-mail możesz chcieć wysłać tę wiadomość na adresy e-mail w treści wiadomości. Ten artykuł poprowadzi Cię, aby uzyskać go w krótkim czasie.
Na przykład ktoś prosi Cię o dane kontaktowe niektórych osób, takie jak adresy e-mail. W takim przypadku możesz chcieć powiadomić te osoby o tej sprawie, wysyłając ich dane kontaktowe do innych osób. Dlatego chciałbyś skopiować adresy e-mail z treści wiadomości do pola „CC”. Ogólnie rzecz biorąc, musisz to zrobić ręcznie jeden po drugim. Ale to zbyt męczące i kłopotliwe. Dlatego w dalszej części przedstawimy o wiele bardziej inteligentny sposób.
Skopiuj adresy e-mail występujące w treści do pola „CC” podczas tworzenia
- Na samym początku naciśnij klawisze „Alt + F11”, aby uruchomić edytor Outlook VBA.
- Następnie w nowym oknie umieść następujący kod VBA w pustym module.
Sub CopyEmailAddresses_FromBodyToCCField()
Dim objMail As Outlook.MailItem
Dim objMailDocument As Object
Dim objDocRange As Object
Dim objRecipient As Outlook.Recipient
'Get the current mail
Set objMail = Application.ActiveInspector.CurrentItem
Set objMailDocument = objMail.GetInspector.WordEditor
Set objDocRange = objMailDocument.Range
'Extract email addresses from mail body
With objDocRange.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = "[A-z,0-9]{1,}\@[A-z,0-9,.]{1,}"
.MatchWildcards = True
.Wrap = wdFindStop
.Execute
End With
'Add the found email addresses as CC recipients
While objDocRange.Find.Found
Set objRecipient = objMail.Recipients.Add(objDocRange.Text)
objRecipient.Type = olCC
objDocRange.Collapse wdCollapseEnd
objDocRange.Find.Execute
Wend
'Resolve all recipients
objMail.Recipients.ResolveAll
End Sub
- Następnie zamknij edytor VBA i dodaj to nowe makro do paska narzędzi szybkiego dostępu w oknie wiadomości, odwołując się do „Jak uruchomić kod VBA w swoim Outlooku".
- W końcu możesz strzelić. Oto moja rzeczywista instancja.
- Po pierwsze, tworzę wiadomość e-mail, która zawiera stos adresów e-mail w treści.
- Następnie kliknij przycisk makra na pasku narzędzi Szybki dostęp.
- Natychmiast po zakończeniu makra wszystkie adresy e-mail w treści zostaną skopiowane do pola „CC”, jak na zrzucie ekranu poniżej.
Co się stanie, jeśli Twoje dane programu Outlook zostaną uszkodzone
Powszechnie wiadomo, że Outlook może paść ofiarą ataku z różnych powodów, takich jak błędy ludzkie, nagłe wyłączenie programu, wewnętrzne błędy oprogramowania Outlook, a także awarie sprzętu komputerowego itd. W związku z tym wielu użytkowników doświadczyło podobnych problemów z Outlookiem. Powszechnie wiadomo, że najbardziej irytującym i kłopotliwym problemem jest uszkodzenie pliku Outlook. W takiej sytuacji należy zwrócić się do specjalisty. Odzyskiwanie PST usługa lub oprogramowanie, np DataNumen Outlook Repair.
Wprowadzenie autora:
Shirley Zhang jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym poprawka mdf i oprogramowanie do naprawy programu Outlook. po więcej informacji odwiedź www.datanumen.com