Come inviare e-mail di testo normale solo a quelli in un dominio specifico tramite Outlook VBA

Condividi ora:

Alcuni utenti desiderano inviare e-mail in testo normale solo ai destinatari i cui indirizzi e-mail si trovano in un dominio specifico. Questo articolo introdurrà un metodo intelligente per ottenerlo.

Nel mio precedente articolo “Come inviare sempre e-mail di Outlook in formato testo normale per contatti specifici”, puoi ottenere 2 approcci per inviare e-mail in testo normale solo a contatti specifici. Se desideri inviare tali e-mail a tutti i contatti in un dominio di posta specifico, utilizzare i 2 modi in quell'articolo sarà un po' stupido e problematico. Quindi, qui ti condivideremo un altro modo, che è molto più efficace.

Invia e-mail di testo normale solo a quelli in un dominio specifico tramite Outlook VBA

Invia e-mail di testo normale solo a quelli in un dominio specifico

  1. Prima di tutto, dovresti avviare la tua applicazione Outlook.
  2. Quindi, è necessario premere i pulsanti "Alt + F11" nella schermata principale di Outlook.
  3. Successivamente, verrà visualizzata la finestra "Microsoft Visual Basic for Applications". In esso, dovresti aprire il progetto "ThisOutlookSession".
  4. Successivamente, copia e incolla il seguente codice VBA in questo progetto.
'Occurs when sending an Outlook email
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objMail As Outlook.MailItem
    Dim objRecipient As Outlook.recipient
    Dim strAddress, strDomain As String
 
    If TypeOf Item Is MailItem Then
       Set objMail = Item
       For Each objRecipient In objMail.Recipients
           'Get the recipient's email domain
           strAddress = objRecipient.Address
           strDomain = Right(strAddress, Len(strAddress) - InStr(strAddress, "@"))
 
           'If the domain is the specific one
           'Change the "datanumen.com" as per your needs
           If strDomain = "datanumen.com" Then
              'Convert the email format to plain text
              objMail.BodyFormat = olFormatPlain
              objMail.Save
              Exit For
           End If
      Next
    End If
End Sub

Codice VBA: invia e-mail di testo normale solo a quelli in un dominio specifico

  1. Successivamente, devi firmare questa macro. Fare clic su "Strumenti" > "Firma digitale" e seguire la procedura guidata su schermo per completarla.
  2. Successivamente, esci dalla finestra corrente. Quindi passa alla scheda "Sviluppatore" e tocca il pulsante "Sicurezza macro". Nella nuova finestra di dialogo popup, è necessario modificare le impostazioni per abilitare le macro firmate digitalmente.
  3. Finalmente puoi sparare. Crea e componi un'e-mail a un destinatario in un dominio e-mail specifico. E premi il pulsante "Invia" per inviarlo. In questo processo, Outlook cambierà automaticamente il formato dell'e-mail in testo normale.

Ripristina file di Outlook corrotti

Outlook è vulnerabile a infezioni da virus, attacchi di malware, sbalzi di tensione e così via. Quindi dovremmo imparare alcuni suggerimenti per ripristinare i dati di Outlook dopo la corruzione. All'inizio, dovresti controllare i tuoi backup. Se il backup è troppo vecchio o non può essere ripristinato, è possibile utilizzare lo strumento integrato: Scanpst.exe. Certo, il strumento di riparazione della posta in arrivo non è sempre efficace. Quindi, faresti meglio a preparare uno strumento esterno affidabile e convincente, come DataNumen Outlook Repair. È altamente raccomandato a causa del suo alto tasso di recupero.

Introduzione dell'autore:

Shirley Zhang è un'esperta di recupero dati in DataNumen, Inc., che è il leader mondiale nelle tecnologie di recupero dati, tra cui sql corrotto e prodotti software di riparazione di Outlook. Per maggiori informazioni visita www.datanumen.com

Condividi ora:

I commenti sono chiusi.