Dacă doriți să trimiteți e-mail Outlook tuturor persoanelor de contact dintr-o anumită categorie de culoare în loturi, puteți utiliza cele 2 metode introduse în acest articol.
Din anumite motive, uneori, poate fi necesar să trimiteți același e-mail tuturor persoanelor de contact dintr-o anumită categorie de culoare. Fără îndoială, trimiterea pe rând este destul de obositoare. Prin urmare, aici vă vom împărtăși 2 abordări. Ambele au propriile lor avantaje și dezavantaje, ai putea alege pe oricare dintre ele după bunul tău plac.
Metoda 1: Trimitere în lot către toate persoanele de contact dintr-o anumită categorie într-un dosar de contact
- Pentru a starcu, lansați aplicația Outlook.
- Apoi, accesați zona „Contacte” și deschideți un dosar de contacte.
- Ulterior, faceți clic în caseta de căutare, apoi apăsați butonul „Categorizare” și alegeți o anumită categorie de culoare din lista derulantă.
- După aceea, veți vedea că sunt listate doar contactele dintr-o anumită categorie de culoare. Acum puteți selecta toate rezultatele căutării apăsând tasta „Ctrl + A”.
- Mai târziu, puteți reveni la fila „Acasă” și faceți clic pe butonul „E-mail”.
- Imediat, se va afișa un nou e-mail. Acum îl puteți compune în funcție de nevoile dvs. și, în sfârșit, apăsați butonul „Trimite” pentru a-l trimite.
Dacă aveți mai multe foldere de contacte într-un anumit fișier de date Outlook și doriți să parcurgeți toate aceste foldere și să găsiți contactele într-o anumită categorie de culoare și apoi să le trimiteți un e-mail în bloc, puteți utiliza următorul mod.
Metoda 2: Trimitere în lot către toate persoanele de contact dintr-o anumită categorie din toate dosarele de contact
- În primul rând, apăsați tastele „Alt + F11” în ecranul principal Outlook.
- Apoi, în noua fereastră, puteți deschide un nou modul.
- Apoi copiați următorul cod VBA în acest modul.
Dim objSourcePSTFile As Outlook.Folder Dim objMail As Outlook.MailItem Dim objMailRecipients As Outlook.Recipients Sub SendanEmailtoAllContactsinSpecificColorCategory() Dim objFolder As Outlook.Folder Set objMail = Application.CreateItemItem.Majil. „Obțineți fișierul PST sursă” Schimbați „John Smith” la numele afișat al propriului fișier PST Set objSourcePSTFile = Application.Session.Folders(„John Smith”) pentru fiecare objFolder din objSourcePSTFile.Folders Apelați Processfolders(objFolder) În continuare „Schimbați sau adăugați mai multe detalii de e-mail aici: Cu objMail .Recipients.ResolveAll .Subject = "Test Mail" .Body = "Introduceți detaliile e-mailului..." .Send End With End Sub Sub Processfolders(objCurrentFolder As Outlook.Folder) Dim objItem As Object Dim objContact As Outlook.ContactItem Dim objSubfolder ca Outlook.Folder If objCurrentFolder.DefaultItemType = olContactItem Apoi pentru fiecare objItem din objCurrentFolder.Items Dacă TypeOf objItem este ContactItem Apoi setați objContact = objItem „Găsiți toate contactele într-o anumită categorie de culori „InStr. > 0 Apoi objMailRecipients.Add objContact.Email1Address End If End If Next objItem End If 'Procesează toate folderele de contacte recursiv If objCurrentFolder.Folders.Count > 0 Atunci pentru fiecare objSubfolder În objCurrentFolder.Folders Next End Subfolders EndSubfolders (Folders Next)
- În cele din urmă, puteți rula această macrocomandă doar apăsând butonul tastei F5.
- Imediat, veți vedea că un nou e-mail este în Căsuța de ieșire, fiind trimis.
Eliminați erorile vexing Outlook
Outlook nu poate fi imun la erori. Prin urmare, este extrem de important pentru noi, utilizatorii obișnuiți, să învățăm cum să facem față diferitelor erori. În primul rând, puteți încerca să le remediați prin starting Outlook în modul sigur, folosind Scanpst sau reconstruirea profilului de e-mail sau repararea suitei MS Office. Dacă toate eșuează, puteți folosi un instrument extern puternic de reparare, cum ar fi DataNumen Outlook Repair.
Introducerea autorului:
Shirley Zhang este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv mdf corupt și produse software de reparații Outlook. Pentru mai multe informații vizitați www.datanumen.com
Lasă un comentariu