Come si fa a rimuovere tutti gli allegati da un'email in Outlook?
Di solito, durante l'anteprima di un'email, puoi eliminare un allegato facendo clic con il tasto destro e selezionando la voce Rimuovi allegato. Tuttavia, se un messaggio contiene numerosi allegati, rimuoverli uno per uno può diventare noioso. Ecco due metodi semplici ed efficaci per eliminare tutti gli allegati da una singola email — o addirittura da più email contemporaneamente — direttamente in Outlook.
Rimuovi manualmente tutti gli allegati da un singolo messaggio email in Outlook
Rimuovi tutti gli allegati da più messaggi email in Outlook con codice VBA
Rimuovi facilmente tutti gli allegati da una o più email con Kutools per Outlook
Rimuovi manualmente tutti gli allegati da un singolo messaggio email in Outlook
È facile rimuovere tutti gli allegati da un messaggio email selezionato utilizzando la funzione Rimuovi allegati in Outlook.
Passo 1: Seleziona il messaggio email di cui desideri rimuovere gli allegati.
Passo 2: Fai clic su uno degli allegati nel riquadro di lettura per attivare la scheda Strumenti allegati.
Passo 3: Fai clic sul pulsante Seleziona tutto nel gruppo Selezione nella scheda Allegati.
Questo passaggio ti consente di selezionare tutti gli allegati del messaggio email scelto in un’unica operazione.
Passo 4: Fai clic sul pulsante Rimuovi allegato nel gruppo Azioni nella scheda Allegati.
Passo 5: Nella finestra di avviso, fai clic sul pulsante Rimuovi allegati.
Tutti gli allegati del messaggio e-mail selezionato verranno eliminati immediatamente.
Nota: La funzione Rimuovi allegati funziona perfettamente in Outlook 2010 e versioni successive, ma non è disponibile in Outlook 2007.
Rimuovi facilmente tutti gli allegati da più email selezionate in Outlook:
Grazie all’utility Stacca tutti gli allegati di Kutools per Excel, puoi rimuovere facilmente tutti gli allegati da più email selezionate, come mostrato nella demo seguente. (Gli allegati verranno salvati in una cartella specificata)Scarica e prova subito! (Prova gratuita di 30 giorni)
Rimuovi tutti gli allegati da più messaggi email in Outlook con codice VBA
Se desideri rimuovere tutti gli allegati da più messaggi email in Microsoft Outlook, il metodo seguente ti permetterà di farlo in modo semplice e rapido. Ti consigliamo innanzitutto di abilitare tutte le macro nel tuo Microsoft Outlook.
Passo 1: Vai alla cartella Documenti, crea una Nuova cartella e denominala OLAttachments
Passo 2: Seleziona più messaggi email da cui desideri rimuovere gli allegati.
Nota: Puoi selezionare messaggi email non consecutivi tenendo premuto il tasto Ctrl e facendo clic.
Puoi selezionare messaggi email consecutivi tenendo premuto il tasto Maiusc e facendo clic.
Passo 3: Apri l'Editor VBA premendo contemporaneamente i tasti Alt e F11.
Passo 4: Espandi Progetto1 > Oggetti Microsoft Outlook nella barra a sinistra, quindi fai doppio clic su ThisOutlookSession per aprirlo nell'editor. Vedi lo screenshot seguente:
Passo 5: Copia e incolla il seguente codice VBA nel riquadro di modifica.
Public Sub ReplaceAttachmentsToLink()
Dim objApp As Outlook.Application
Dim aMail As Outlook.MailItem 'Object
Dim oAttachments As Outlook.Attachments
Dim oSelection As Outlook.Selection
Dim i As Long
Dim iCount As Long
Dim sFile As String
Dim sFolderPath As String
Dim sDeletedFiles As String
' Get the path to your My Documents folder
sFolderPath = CreateObject("WScript.Shell").SpecialFolders(16)
On Error Resume Next
' Instantiate an Outlook Application object.
Set objApp = CreateObject("Outlook.Application")
' Get the collection of selected objects.
Set oSelection = objApp.ActiveExplorer.Selection
' Set the Attachment folder.
sFolderPath = sFolderPath & "\OLAttachments"
' Check each selected item for attachments. If attachments exist,
' save them to the Temp folder and strip them from the item.
For Each aMail In oSelection
' This code only strips attachments from mail items.
' If aMail.class=olMail Then
' Get the Attachments collection of the item.
Set oAttachments = aMail.Attachments
iCount = oAttachments.Count
If iCount > 0 Then
' We need to use a count down loop for removing items
' from a collection. Otherwise, the loop counter gets
' confused and only every other item is removed.
For i = iCount To 1 Step -1
' Save attachment before deleting from item.
' Get the file name.
sFile = oAttachments.Item(i).FileName
' Combine with the path to the Temp folder.
sFile = sFolderPath & "\" & sFile
' Save the attachment as a file.
oAttachments.Item(i).SaveAsFile sFile
' Delete the attachment.
oAttachments.Item(i).Delete
'write the save as path to a string to add to the message
'check for html and use html tags in link
If aMail.BodyFormat <> olFormatHTML Then
sDeletedFiles = sDeletedFiles & vbCrLf & "<file://" & sFile & ">"
Else
sDeletedFiles = sDeletedFiles & "<br>" & "<a href='file://" & _
sFile & "'>" & sFile & "</a>"
End If
Next i
'End If
' Adds the filename string to the message body and save it
' Check for HTML body
If aMail.BodyFormat <> olFormatHTML Then
aMail.Body = aMail.Body & vbCrLf & _
"The file(s) were saved to " & sDeletedFiles
Else
aMail.HTMLBody = aMail.HTMLBody & "<p>" & _
"The file(s) were saved to " & sDeletedFiles & "</p>"
End If
aMail.Save
'sets the attachment path to nothing before it moves on to the next message.
sDeletedFiles = ""
End If
Next 'end aMail
ExitSub:
Set oAttachments = Nothing
Set aMail = Nothing
Set oSelection = Nothing
Set objApp = Nothing
End SubPasso 6: Premi il tasto F5 per eseguire questo codice VBA.
Ora tutti gli allegati dai messaggi email selezionati sono stati rimossi, sostituendoli con collegamenti ipertestuali posizionati in fondo a ciascun messaggio selezionato.
Rimuovi facilmente tutti gli allegati da una o più email con Kutools per Outlook
L’utility Stacca tutti allegati di Kutools per Outlook rimuove rapidamente tutti gli allegati da una o più email selezionate in Outlook. Ecco come procedere.
Kutools per Outlook: con oltre 100 pratici componenti aggiuntivi per Outlook, prova gratuitamente e senza limitazioni per 30 giorni.
1. Seleziona uno o più messaggi email contenenti gli allegati che desideri rimuovere, quindi fai clic su Kutools > Strumenti allegati > Stacca tutti. Vedi screenshot:
2. Nella finestra di dialogo Impostazioni di distacco, procedi come segue.
- 2,1 Fai clic sul pulsante Sfoglia per selezionare una cartella in cui salvare tutti gli allegati eliminati.
- 2,2 Per impostazione predefinita, la casella Distacca gli allegati con lo stile seguente è selezionata; scegli un'opzione per salvare gli allegati in cartelle diverse in base alle email, secondo le tue esigenze.
- 2,3 Fai clic sul pulsante OK. Vedi screenshot:
3. Fai clic sul pulsante Sì nella finestra di dialogo Stacca tutti.
4. Verrà visualizzata una finestra di dialogo Kutools per Outlook che ti informerà su quanti allegati sono stati eliminati. Fai clic sul pulsante OK.
Ora tutti gli allegati sono stati rimossi immediatamente, lasciando nei messaggi selezionati soltanto i collegamenti ipertestuali. Clicca su un collegamento per aprire l’allegato corrispondente quando ti serve.
Se desidera provare gratuitamente (30 giorni) questa utility, faccia clic qui per scaricarla, quindi segua la procedura illustrata nei passaggi sopra.
Migliori strumenti per la produttività in Office
Scopri il nuovissimo Kutools per Outlook con 100+ funzionalità incredibili!Clicca per scaricare ora!
📧Automazione delle email: Risposta automatica (disponibile per POP e IMAP) / Invio email programmato / CC/BCC automatico in base a regole durante l’invio delle email / Inoltro automatico (regola avanzata) / Aggiunta automatica del saluto / Divisione automatica delle email con destinatari multipli in messaggi individuali...
📨Gestione delle email: Richiama Email / Blocca le email truffaldine in base all’oggetto e ad altri criteri / Elimina email duplicate / Ricerca avanzata / Organizza cartelle...
📁Allegati Pro: Salvataggio batch / Distacco batch / Compressione batch / Salvataggio automatico / Distacco automatico / Compressione automatica…
🌟Magia dell’interfaccia: 😊 Più emoji graziose e accattivanti / Ti avvisa all’arrivo di email importanti / Riduci a icona Outlook invece di chiuderlo...
👍Meraviglie con un clic: Rispondi a Tutti con Allegati / Email anti-phishing / 🕘 Mostra il fuso orario – Ora corrente del mittente...
👩🏼🤝👩🏻Contatti e calendario: Aggiungi contatti in blocco dalle email selezionate / Dividi un gruppo di contatti in gruppi individuali / Rimuovi i promemoria dei compleanni...
Usa Kutools nella tua lingua preferita: supporta inglese, spagnolo, tedesco, francese, cinese e oltre 40 altre lingue!
🚀 Download con un clic — Ottieni tutti i componenti aggiuntivi per Office
Fortemente consigliato: Kutools for Office (5-in-1)
Un clic per scaricare cinque programmi di installazionetutti insieme —Kutools per Excel, Outlook, Word, PowerPointe Office Tab Pro.Clicca per scaricare ora!
- ✅Comodità con un solo clic: scarica tutti e cinque i pacchetti di installazione in un’unica azione.
- 🚀Pronto per qualsiasi attività in Office: installa i componenti aggiuntivi che ti servono, esattamente quando ti servono.
- 🧰Inclusi: Kutools per Excel / Kutools per Outlook / Kutools per Word / Office Tab Pro / Kutools for PowerPoint