Come inviare in batch tutte le e-mail aperte e composte in Outlook

Dopo aver finito di comporre alcune e-mail in Outlook, potresti sperare di inviarle in una volta sola. Ora, in questo articolo, ti insegneremo come ottenerlo con l'aiuto del codice VBA.

Ad esempio, hai completato alcune nuove e-mail ma non le hai inviate, semplicemente tenendole aperte. E dopo, vuoi inviarli. In generale, devi fare clic sul pulsante "Invia" in ogni e-mail una per una. In questa circostanza, devi desiderare ardentemente un metodo che possa supportarti per inviare in blocco tutte le email aperte e composte.

Di seguito, ti esporremo un modo così efficace. Sta usando VBA. se non sai come usare VBA, puoi fare riferimento all'articolo - "Come eseguire il codice VBA in Outlook" Nel frattempo.

Invia in batch tutte le e-mail aperte e composte

1. Per cominciare, puoi comporre le tue e-mail come al solito e tenerle aperte.
2. Quindi, premi "Alt + F11" per accedere all'editor VBA.
3. Successivamente, nella nuova finestra, copia il seguente codice VBA in un modulo.

Sub BatchSendOutAllOpenEmails()
    Dim objInspectors As Outlook.Inspectors
    Dim i As Long
    Dim objMail As Outlook.MailItem
    Dim lMailCount As Long
 
    'Get all open items in your Outlook
    Set objInspectors = Outlook.Application.Inspectors
 
    lMailCount = 0
    For i = objInspectors.Count To 1 Step -1
        If objInspectors.Item(i).CurrentItem.Class = olMail Then
           'Get all open emails
           Set objMail = objInspectors.Item(i).CurrentItem
 
           'Send out open emails that contain subject & recipients
           If objMail.Subject <> "" Then
              If objMail.Recipients.Count > 0 Then
                 objMail.Send
                 lMailCount = lMailCount + 1
              End If
           End If
        End If
    Next
 
    'Prompt you of the results
    MsgBox lMailCount & " open emails have been sent out!", vbInformation + vbOKOnly
End Sub

4. Successivamente, attiva questa macro premendo direttamente il tasto "F5".
5. Infine, al termine della macro, ti verrà richiesto il numero di email da inviare.
6. Ora apri Posta in uscita, in cui puoi vedere che tutte le e-mail aperte in precedenza vengono inviate.

Ripristina Outlook da danni imprevisti

Hai mai incontrato la corruzione di Outlook prima? Molti utenti sono stati soggetti a questo problema e se ne sono lamentati. In generale, se si realizzano soluzioni tempestive ed efficaci, è possibile recuperare prontamente i dati di Outlook da PST danneggiato file. Ad esempio, se disponi di dati di Outlook aggiornati, puoi facilmente ripristinare il backup. Certo, potresti prendere l'aiuto di uno strumento di riparazione eccellente e affidabile, come DataNumen Outlook Repair, che può scansionare il file di Outlook corrotto e recuperare il massimo dei dati.

Introduzione dell'autore:

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