Come rispondere automaticamente con il messaggio di posta elettronica originale in Outlook?
Normalmente, quando creiamo una regola per affidare automaticamente l'e-mail fuori sede, ma il messaggio originale nel corpo non verrà incluso. Come puoi fare affidamento automatico sulle e-mail con il messaggio originale in Outlook? In questo articolo, parlerò di un codice VBA per aiutarti a completare questo lavoro il più rapidamente possibile in Outlook.
Email di risposta automatica con messaggio originale in Outlook con codice VBA
Email di risposta automatica con messaggio originale in Outlook con codice VBA
La normale regola di Outlook non può aiutarti a gestire il lavoro, ma, con il seguente codice VBA, puoi completarlo rapidamente e facilmente. Per favore, fai come segue:
1. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Nel Microsoft Visual Basic, Applications Edition finestra, fare doppio clic QuestoOutlookSession dal Progetto1 (VbaProject.OTM) riquadro per aprire la modalità, quindi copia e incolla il codice seguente nel modulo vuoto.
Codice VBA: email di risposta automatica con messaggio originale:
Public WithEvents xlItems As Outlook.Items
Private Sub Application_Startup()
Set xlItems = Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub xlItems_ItemAdd(ByVal objItem As Object)
Dim xlReply As MailItem
Dim xStr As String
If objItem.Class <> olMail Then Exit Sub
Set xlReply = objItem.Reply
With xlReply
xStr = "<p>" & "Hi, Your email has been received. Thank you!" & "</p>"
.HTMLBody = xStr & .HTMLBody
.Send
End With
End Sub
3. Quindi salva e chiudi la finestra del codice, chiudi o riavvia Outlook per rendere effettivo il codice VBA. Ora, quando ricevi le e-mail, Outlook invierà una risposta automatica con il messaggio originale come mostrato nella seguente schermata:
I migliori strumenti per la produttività in ufficio
Kutools for Outlook - Oltre 100 potenti funzionalità per potenziare il tuo Outlook
🤖 Assistente di posta AI: E-mail istantanee professionali con la magia dell'intelligenza artificiale: risposte geniali con un solo clic, tono perfetto, padronanza multilingue. Trasforma l'e-mail senza sforzo! ...
???? Automazione di posta elettronica: Fuori sede (disponibile per POP e IMAP) / Pianifica l'invio di e-mail / CC/BCC automatico in base alle regole durante l'invio di e-mail / Inoltro automatico (regole avanzate) / Aggiunta automatica di saluto / Suddividi automaticamente le email con più destinatari in singoli messaggi ...
📨 gestione e-mail: Richiama facilmente le email / Blocca le email truffe per soggetto e altri / Elimina email duplicate / Ricerca avanzata / Consolidare cartelle ...
📁 Allegati Pro: Salvataggio in batch / Stacca batch / Comprimi in lotti / Salvataggio automatico / Scollegamento automatico / Comprimi automaticamente ...
🌟 Magia dell'interfaccia: 😊Più emoji carini e fantastici / Aumenta la tua produttività in Outlook con le visualizzazioni a schede / Riduci a icona Outlook invece di chiuderlo ...
👍 Meraviglie con un clic: Rispondi a tutti con gli allegati in arrivo / E-mail anti-phishing / 🕘Mostra il fuso orario del mittente ...
👩🏼🤝👩🏻 Contatti e calendario: Aggiungi in batch contatti dalle email selezionate / Dividere un gruppo di contatti in singoli gruppi / Rimuovi promemoria compleanno ...
Al di sopra Caratteristiche 100 Attendi la tua esplorazione! Clicca qui per scoprire di più.