Come salvare solo allegati specifici (Excel) in Outlook?
Outlook offre la funzionalità Salva tutti gli allegati per aiutarti a salvare tutti gli allegati di un'email in una cartella specifica in una volta sola. Tuttavia, se vuoi salvare solo determinati tipi di allegati in una o più email, come fogli di lavoro Excel, documenti Word e così via, come puoi farlo? In questo tutorial ti forniamo due metodi per risolvere questo problema.
Salva solo allegati in un formato file specifico in Outlook con il codice VBA
Salva facilmente solo allegati in un formato file specifico in Outlook con uno strumento incredibile
Salva solo allegati in un formato file specifico in Outlook con il codice VBA
Il seguente codice VBA può aiutare a salvare solo allegati in un formato file specifico da una o più email selezionate in una cartella specifica. Procedi come segue.
1. Avvia il tuo Outlook. Nell'elenco delle email, seleziona una o più email da cui desideri salvare solo gli allegati in un formato file specifico.
2. Premi "Alt" + "F11" per aprire la finestra "Microsoft Visual Basic for Applications". Nella finestra che si apre, clicca su "Inserisci" > "Modulo", quindi copia il seguente codice VBA nella finestra del Modulo.
Codice VBA: Salva solo allegati specifici in un'email o più email in una cartella
Public Sub SaveSpecifyAttachments()
'Updated by ExtendOffice 20210617
Dim xItem As Object, xFldObj As Object
Dim xSelection As Selection
Dim xAttachment As Outlook.Attachment
Dim xSaveFolder As String
Dim xFSO As Scripting.FileSystemObject
Dim xFilePath, xFilesSavePath As String
Dim xExtStr As String, xExt As String
Dim xExtArr() As String, xS As Variant
On Error Resume Next
Set xFldObj = CreateObject("Shell.Application").BrowseforFolder(0, "Select a Folder", 0, 16)
Set xFSO = New Scripting.FileSystemObject
If xFldObj Is Nothing Then Exit Sub
xSaveFolder = xFldObj.Items.Item.Path & "\"
Set xSelection = Outlook.Application.ActiveExplorer.Selection
xExtStr = InputBox("Attachment Format:" + VBA.vbCrLf + "(Please separate multiple file extensions by comma.. Such as: .docx,.xlsx)", "Kutools for Outlook", xExtStr)
If Len(Trim(xExtStr)) = 0 Then Exit Sub
For Each xItem In xSelection
If xItem.Class = olMail Then
xFilesSavePath = ""
For Each xAttachment In xItem.Attachments
xFilePath = xSaveFolder & xAttachment.FileName
xExt = "." & xFSO.GetExtensionName(xFilePath)
xExtArr = VBA.Split(xExtStr, ",")
xS = VBA.Filter(xExtArr, xExt)
If UBound(xS) > -1 Then
xAttachment.SaveAsFile xFilePath
If xItem.BodyFormat <> olFormatHTML Then
xFilesSavePath = xFilesSavePath & vbCrLf & "<file://" & xFilePath & ">"
Else
xFilesSavePath = xFilesSavePath & "" & "" & xFilePath & ""
End If
End If
Next
xItem.Save
End If
Next
Set xFSO = Nothing
End Sub3. Clicca su "Strumenti" > "Riferimenti"; nella finestra di dialogo "Riferimenti – Progetto", seleziona la casella "Microsoft Scripting Runtime" e clicca sul pulsante "OK".
4. Premi il tasto "F5" per eseguire il codice. Nella finestra di dialogo "Sfoglia cartella" che appare, scegli una cartella in cui salvare gli allegati.
5. Quindi, clicca su "OK", nella successiva finestra di dialogo "Kutools per Outlook", inserisci l'estensione del file degli allegati che vuoi salvare nella casella di testo e clicca su "OK".
Nota: Per più estensioni di file, è necessario separarle con virgole.
Verranno salvati solo gli allegati specificati.
Salva facilmente solo allegati in un formato file specifico in Outlook con uno strumento incredibile
Se sei nuovo al VBA, qui ti consigliamo di utilizzare la funzionalità Salva tutti gli allegati di "Kutools per Outlook". Con questa funzionalità, puoi facilmente salvare solo gli allegati in un formato file specifico in Outlook.
1. Seleziona le email da cui vuoi salvare solo gli allegati in un formato file specifico.
2. Clicca su "Kutools" > "Strumenti allegati" > "Salva tutti".
3. Nella finestra di dialogo "Impostazioni di salvataggio", devi configurare come segue.
pulsante per selezionare una cartella in cui salvare gli allegati;
4. Apparirà una finestra di dialogo che ti chiede se desideri salvare gli allegati, clicca su "OK" per continuare.
5. Poi apparirà un'altra finestra di dialogo che ti informerà su quanti allegati sono stati salvati, clicca sul pulsante "OK".
Ora verranno salvati solo gli allegati in un formato file specifico.
Articoli correlati:
- Come salvare tutti gli allegati dai messaggi di posta elettronica in Outlook?
- Come rimuovere tutti gli allegati dalle email in Outlook?
I migliori strumenti per la produttività in Office
Ultime novità: Kutools per Outlook lancia la versione gratuita!
Scopri la nuovissima versione GRATUITA di Kutools per Outlook con oltre70 funzionalità straordinarie, da utilizzare PER SEMPRE! Clicca per scaricarla subito!
📧 Automazione Email: Risposta automatica (disponibile per POP e IMAP) / Programma invio email / CC/BCC automatico tramite regola durante l'invio / Inoltro automatico (Regola avanzata) / Aggiungi saluto automaticamente / Suddividi automaticamente le email con più destinatari in messaggi individuali...
📨 Gestione Email: Richiama Email / Blocca email di phishing per oggetto e altri criteri / Elimina email duplicate / Ricerca Avanzata / Organizza cartelle...
📁 Allegati Pro: Salva in blocco / Distacca in blocco / Comprimi in blocco / Salvataggio automatico / Distacca automaticamente / Auto Comprimi...
🌟 Magia dell'interfaccia: 😊Più emoji belle e originali / Notifiche per email importanti / Riduci Outlook a icona invece di chiuderlo...
👍 Funzioni rapide: Rispondi a Tutti con Allegati / Email anti-phishing / 🕘Mostra il fuso orario del mittente...
👩🏼🤝👩🏻 Contatti & Calendario: Aggiungi in blocco contatti dalle email selezionate / Dividi un gruppo di contatti in gruppi individuali / Rimuovi promemoria di compleanno...
