Come inoltrare automaticamente solo gli allegati in base a criteri specifici in Outlook?
Normalmente, quando si inoltra un'email, il corpo del messaggio originale e gli allegati vengono inclusi. Tuttavia, a volte è necessario inoltrare solo gli allegati senza il messaggio originale, basandosi su determinati criteri, a una persona specifica. Come potresti risolvere questa operazione in Outlook?
Inoltra automaticamente solo gli allegati in base a criteri specifici a una persona utilizzando il codice VBA
Ad esempio, quando si riceve un'email con l'oggetto che contiene il testo “kto feature”, tutti gli allegati di questa email verranno inoltrati automaticamente alla persona specifica senza il corpo del messaggio. I seguenti passaggi possono aiutarti, procedi come segue:
1. Tieni premuti i tasti ALT + F11 per aprire la finestra Microsoft Visual Basic for Applications.
2. Nella finestra Microsoft Visual Basic for Applications, fai doppio clic su ThisOutlookSession nel riquadro Project1(VbaProject.OTM) per aprire la modalità e poi copia e incolla il seguente codice nel modulo vuoto.
Codice VBA: Inoltro automatico dell'email senza il corpo del messaggio ma includendo solo gli allegati:
Public WithEvents ReceivedItems As Outlook.Items
Private Sub Application_Startup()
Set ReceivedItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub ReceivedItems_ItemAdd(ByVal Item As Object)
Dim xForwardMail As Outlook.MailItem
Dim xEmail As MailItem
On Error Resume Next
If Item.Class <> olMail Then Exit Sub
Set xEmail = Item
If InStrRev(UCase(xEmail.Subject), UCase("kto feature")) = 0 Then Exit Sub 'change subject text to your need
If xEmail.Attachments.Count = 0 Then Exit Sub
Set xForwardMail = xEmail.Forward
With xForwardMail
.HTMLBody = ""
With .Recipients
.Add "skyyang@addin88.com" 'change address to your own
.ResolveAll
End With
.Send
End With
End Sub
Nota: Nel codice sopra, dovresti modificare il testo dell'oggetto e l'indirizzo del destinatario con i tuoi dati.
3. Salva quindi il codice e riavvia Outlook per rendere effettive le modifiche.
4. Da ora in poi, ogni volta che arriva una nuova email contenente il testo dell'oggetto specifico nella tua casella di posta, Outlook inoltrerà automaticamente i suoi allegati senza il corpo del messaggio alla persona desiderata.
Nota: Questo codice è disponibile solo per l'account predefinito.
I migliori strumenti per la produttività in Office
Ultime novità: Kutools per Outlook lancia la versione gratuita!
Scopri il nuovo Kutools per Outlook con oltre100 funzionalità incredibili! Clicca per scaricare ora!
📧 Automazione email: Risposta automatica (disponibile per POP e IMAP) / Programmazione invio email / CC/BCC automatico tramite regola durante l’invio dell’email / Inoltro automatico (Regola avanzata) / Aggiungi saluto automaticamente / Suddivisione automatica delle email con più destinatari in email individuali ...
📨 Gestione email: Richiama Email / Blocca email di truffa tramite Oggetto e altro / Elimina Email duplicate / Ricerca Avanzata / Organizza cartelle ...
📁 Allegati Pro: Salvataggio in batch / Distacco in batch / Compressione in batch / Salvataggio automatico / Distacca automaticamente / Auto Comprimi ...
🌟 Magia dell’interfaccia: 😊Più emoji belle e simpatiche / Ti avvisa quando arrivano email importanti / Minimizza Outlook invece di chiuderlo ...
👍 Meraviglie con un clic: Rispondi a Tutti con Allegati / Email Anti-phishing / 🕘Mostra il fuso orario del mittente ...
👩🏼🤝👩🏻 Contatti e Calendario: Aggiunta massiva dei contatti dalle email selezionate / Dividi un Gruppo di Contatti in gruppi individuali / Rimuovi promemoria di compleanno ...
Usa Kutools nella lingua che preferisci: supporta Inglese, Spagnolo, Tedesco, Francese, Cinese e oltre40 altre lingue!
