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 Sub

3. 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.

3.1) Nella sezione "Salva gli allegati in questa cartella", clicca sul pulsante per selezionare una cartella in cui salvare gli allegati;

3.2) Clicca sul pulsante "Opzioni avanzate" per espandere la finestra di dialogo;

3.3) Nella sezione "Condizioni di filtro", seleziona la casella di controllo "Tipo di allegato", quindi inserisci l'estensione del file degli allegati che vuoi salvare nel testo.

Nota: Per più estensioni di file, è necessario separarle con punti e virgola.

3.4) Clicca sul pulsante "OK". Vedi screenshot:

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 notizie: Kutools per Outlook lancia la versione gratuita!

Scopri il nuovissimo Kutools per Outlook con oltre100 funzionalità straordinarie! Clicca per scaricare ora!

🤖 Kutools AI : Utilizza una tecnologia AI avanzata per gestire le email senza sforzo, inclusa la risposta, la sintesi, l’ottimizzazione, l’estensione, la traduzione e la composizione dei messaggi.

📧 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!

Sblocca Kutools per Outlook istantaneamente con un solo clic. Non aspettare, scarica ora e aumenta la tua efficienza!

Tabella Unidimensionale di Kutools per Outlook      Scarica ora      Vai a Acquista

🚀 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

Informazioni sulla Suite ⬇ Scarica la Suite 💳 Acquista la Suite