Come rispondere automaticamente con il messaggio email originale in Outlook?
Normalmente, quando creiamo una regola per rispondere automaticamente alle email fuori sede, il messaggio originale nel corpo non sarà incluso. Come potresti rispondere automaticamente alle email includendo il messaggio originale in Outlook? In questo articolo, parlerò di un codice VBA per aiutarti a completare questa operazione il più rapidamente possibile in Outlook.
Rispondi automaticamente alle email con il messaggio originale in Outlook utilizzando il codice VBA
Rispondi automaticamente alle email con il messaggio originale in Outlook utilizzando il codice VBA
La normale regola di Outlook non può aiutarti a gestire questo compito, ma, con il seguente codice VBA, puoi completarlo rapidamente e facilmente. Procedi come segue:
1. Tieni premuti i tasti ALT + F11 per aprire la finestra di Microsoft Visual Basic for Applications.
2. Nella finestra di Microsoft Visual Basic for Applications, fai doppio clic su ThisOutlookSession dal riquadro Project1(VbaProject.OTM) per aprire la modalità, quindi copia e incolla il seguente codice nel modulo vuoto.
Codice VBA: Rispondi automaticamente alle email con il 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. Salva e chiudi quindi la finestra del codice, chiudi o riavvia Outlook per rendere effettivo il codice VBA. Ora, quando ricevi email, Outlook invierà una risposta automatica con il messaggio originale, come mostrato nello screenshot seguente:
I migliori strumenti per la produttività in Office
Ultime notizie: Kutools per Outlook lancia la versione gratuita!
Scopri il nuovissimo Kutools per Outlook con oltre100 funzionalità straordinarie! Clicca per scaricare ora!
📧 Automazione Email: Risposta automatica (disponibile per POP e IMAP) / Programma invio Email / CC/BCC automatico tramite Regola durante l’invio delle Email / Inoltro automatico (Regola avanzata) / Aggiungi Saluto automaticamente / Dividi automaticamente Email multi-destinatario in messaggi singoli ...
📨 Gestione Email: Richiama Email / Blocca Email fraudulent (tramite Oggetto e altri parametri) / Elimina Email Duplicato / Ricerca Avanzata / Organizza cartelle ...
📁 Allegati Pro: Salva in Batch / Distacca in Batch / Comprimi in Batch / Salvataggio automatico / Distacca automaticamente / Auto Comprimi ...
🌟 Magia Interfaccia: 😊Più emoji belle e divertenti / Notifiche per le email importanti in arrivo / Riduci Outlook al posto di chiuderlo ...
👍 Funzioni rapide: Rispondi a Tutti con Allegati / Email Anti-Phishing / 🕘Mostra il fuso orario del mittente ...
👩🏼🤝👩🏻 Contatti & Calendario: Aggiungi in Batch contatti dalle Email selezionate / Dividi un Gruppo di Contatti in Gruppi singoli / Rimuovi promemoria di compleanno ...
Utilizza Kutools nella lingua che preferisci – supporta Inglese, Spagnolo, Tedesco, Francese, Cinese e oltre40 altre!
🚀 Download con un solo clic — Ottieni tutti gli Add-in per Office
Consigliato: Kutools per Office (5-in-1)
Un solo clic per scaricare cinque installatori contemporaneamente — Kutools per Excel, Outlook, Word, PowerPoint e Office Tab Pro. Clicca per scaricare ora!
- ✅ Comodità con un solo clic: scarica tutti e cinque i pacchetti di installazione in una sola azione.
- 🚀 Pronto per qualsiasi attività Office: installa i componenti aggiuntivi necessari, quando ti servono.
- 🧰 Inclusi: Kutools per Excel / Kutools per Outlook / Kutools per Word / Office Tab Pro / Kutools per PowerPoint