Note: The other languages of the website are Google-translated. Back to English
English English
  • Documenti
  • Outlook
  • Come scaricare / salvare automaticamente gli allegati da Outlook in una determinata cartella?

Come scaricare / salvare automaticamente gli allegati da Outlook in una determinata cartella?

In generale, puoi salvare tutti gli allegati di un'e-mail con un clic allegati > Salva tutti gli allegati in Outlook. Ma se hai bisogno di salvare tutti gli allegati da tutte le e-mail ricevute e ricevute, hai qualche idea? Questo articolo introdurrà due soluzioni per scaricare automaticamente gli allegati da Outlook in una determinata cartella.


Scarica automaticamente gli allegati di Outlook nella cartella con VBA e regola

Questo metodo introdurrà uno script VBA ed eseguirà questo script con una regola per scaricare e salvare automaticamente gli allegati di Outlook in una determinata cartella. Si prega di fare quanto segue:

1. stampa altro + F11 tasti per aprire la finestra di Microsoft Visual Basic, Applications Edition.

2. Clic inserire > Modulo, quindi incolla sotto lo script VBA nella nuova finestra del modulo di apertura.

VBA: salvataggio automatico degli allegati di Outlook in una determinata cartella

Public Sub SaveAttachmentsToDisk(MItem As Outlook.MailItem)
Dim oAttachment As Outlook.Attachment
Dim sSaveFolder As String
sSaveFolder = "C:\Users\DT168\Documents\outlook-attachments\"
For Each oAttachment In MItem.Attachments
oAttachment.SaveAsFile sSaveFolder & oAttachment.DisplayName
Next
End Sub

Note:: Per favore scoprilo sSaveFolder = "C: \ Users \ DT168 \ Documents \ outlook-attachments \"e sostituisci il percorso della cartella di destinazione di cui hai bisogno.

3. Salvare lo script VBA e chiudere la finestra di Microsoft Visual Basic, Applications Edition.

4. Vai al posta visualizzare e fare clic su Casa > Regole > Gestisci regole e avvisi. Vedi screenshot:

5. Nella finestra di dialogo Regole e avvisi di apertura, fare clic su Nuova regola pulsante sulla Regole di posta elettronica tab. Vedi screenshot:

6. Ora nella finestra di dialogo Creazione guidata regole, fare clic per selezionare il file Applica la regola sui messaggi che ricevo opzione e fare clic su Successiva pulsante.

7. Nella finestra di dialogo Creazione guidata regole (quali condizioni si desidera controllare?), Deselezionare qualsiasi opzione e fare clic su Successiva pulsante. Quindi fare clic su pulsante nella finestra di dialogo di Microsoft Outlook che si apre. Vedi screenshot:

8. Ora nella finestra di dialogo Creazione guidata regole (cosa vuoi fare con il messaggio?), Per favore: (1) Controlla il eseguire uno script opzione; (2) Fare clic sul testo di un copione per aprire la finestra di dialogo Seleziona script, selezionare lo script aggiunto al passaggio 2 e fare clic su OK pulsante; (3) Clicca su Successiva pulsante.

9. Nella finestra di dialogo Creazione guidata regole (sono presenti eccezioni?), Fare clic su Successiva direttamente il pulsante.

10. Ora nell'ultima finestra di dialogo Creazione guidata regole, nomina la regola nel file Passo 1 casella, controlla le opzioni di cui hai bisogno nel file Passo 2 sezione e fare clic su Fine pulsante.

11. Chiudi la finestra di dialogo Regole e avvisi.

E ora tutti gli allegati vengono scaricati dal tuo account e-mail e salvati nella cartella di destinazione specificata. E tutti gli allegati delle e-mail in arrivo verranno automaticamente scaricati e salvati anche nella cartella specificata.


Scarica automaticamente gli allegati di Outlook nella cartella con Kutools per Outlook

Se hai installato Kutools per Outlook, puoi applicarlo Scollegamento automatico opzione per scaricare automaticamente tutti gli allegati di Outlook e salvarli facilmente in una determinata cartella.

Kutools per Outlook: Aggiungi più di

100
strumenti utili per Outlook, da provare gratuitamente senza limitazioni
60
giorni; Continua a leggere...      Prova gratuita ora

1. Clic Kutools > Scollegamento automatico > permettere per abilitare la funzione Scollegamento automatico.

2. Vai avanti per fare clic Kutools > Scollegamento automatico > Gestore scollegamento automatico.

3. Nella finestra di dialogo Scollegamento automatico allegati, selezionare il file Scollega automaticamente tutti gli allegati ricevuti opzione, quindi configurare come segue:
(1) Fare clic sul pulsante Sfoglia  per specificare la cartella di destinazione in cui salvare gli allegati scollegati automaticamente;
(2) È facoltativo controllare Crea sottocartelle nel seguente stile opzione, quindi selezionare uno stile di sottocartella dall'elenco a discesa sottostante;
(3) È facoltativo controllare Stacca solo gli allegati con la seguente estensione opzione, quindi digita le estensioni dei file degli allegati nella casella sottostante;
(4) È facoltativo controllare l'icona Allegato è ancora rimasta nelle e-mail opzioni.

Note:: Se è necessario scollegare automaticamente gli allegati dai mittenti, è possibile controllare il file Scollega automaticamente gli allegati in base alle regole fare clic sull'opzione New e quindi digitare l'indirizzo e-mail del mittente e specificare la cartella di destinazione nella seconda finestra di dialogo Scollegamento automatico allegati.

4. Clicca il Ok pulsante per salvare le impostazioni.

D'ora in poi, tutti gli allegati (o gli allegati con estensioni di file specificate o gli allegati da mittenti specificati in base alle impostazioni) verranno salvati automaticamente.

Note:: Puoi applicare Kutools per Outlook Scollega tutto (Allegati) o Salva tutto (Allegati) per scaricare / salvare rapidamente tutti gli allegati da più / tutte le e-mail ricevute in Outlook.


Demo: scarica automaticamente gli allegati di Outlook nella cartella con Kutools per Outlook


Consiglio: In questo video, Kutools la scheda viene aggiunta da Kutools per Outlook. Se ne hai bisogno, fai clic su per saperne di più, clicca qui avere un

60
-giorni di prova gratuita senza limitazioni!


Articoli correlati:


Kutools for Outlook: porta 100 funzionalità avanzate in Outlook e semplifica notevolmente il lavoro!

  • Auto CC / BCC dalle regole durante l'invio di e-mail; Avanzamento automatico Email multiple personalizzate; Risposta automatica senza server di scambio e più funzioni automatiche ...
  • Avviso BCC - mostra il messaggio quando provi a rispondere a tutti se il tuo indirizzo e-mail è nell'elenco BCC; Ricorda quando mancano allegatie altre funzioni di promemoria ...
  • Rispondi (tutti) con tutti gli allegati nella conversazione di posta; Rispondi a molte email in secondi; Aggiunta automatica di saluto quando rispondi; Aggiungi la data all'oggetto ...
  • Strumenti per gli allegati: gestisci tutti gli allegati in tutti i messaggi, Scollegamento automatico, Comprimi tutto, Rinomina tutto, Salva tutto... Rapporto rapido, Conta le email selezionate...
  • E-mail spazzatura potenti per abitudine; Rimuovi messaggi e contatti duplicati... Consentono di fare in modo più intelligente, veloce e migliore in Outlook.
girato kutools outlook scheda kutools 1180x121
girato kutools outlook kutools plus tab 1180x121
 
Commenti (108)
Rinomato 4.5 su 5 · Valutazioni 1
Questo commento è stato fatto dal moderatore sul sito
Ciao a tutti Lo script non funziona per me. C'è qualcos'altro che deve essere fatto. Public Sub SaveAttachmentsToDisk(MItem As Outlook.MailItem) Dim oAttachment As Outlook.Attachment Dim sSaveFolder As String sSaveFolder = "\\MHO-ITD-SM\Users\smutharaju\Desktop\Ranjith\Outlook Attachments" per ogni oAttachment in MItem.Attachments oAttachment .SaveAsFile sSaveFolder & oAttachment.DisplayName Next End Sub
Questo commento è stato fatto dal moderatore sul sito
Ciao SRINIVAS, credo che tu debba aggiungere la lettera di unità all'inizio del tuo link. cioè C:\utenti\test\ecc. Spero che questo aiuti! Andrea
Questo commento è stato fatto dal moderatore sul sito
In VBA devi anche aggiungere una barra rovesciata finale alla fine del percorso del file. Come segue. "D:\Allegati Outlook\" Spero che questo risolva eventuali problemi. Matt
Questo commento è stato fatto dal moderatore sul sito
HI

lo script VBA ha funzionato alla grande per me..... una volta - mai più.

Ho persino cancellato i file nella cartella e ho eseguito nuovamente e niente.

Che cosa sto facendo di sbagliato ? - la regola è in esecuzione poiché ottengo contemporaneamente la visualizzazione di un avviso
Questo commento è stato fatto dal moderatore sul sito
[quote]Ciao a tutti Lo script non funziona per me. C'è qualcos'altro che deve essere fatto. Public Sub SaveAttachmentsToDisk(MItem As Outlook.MailItem) Dim oAttachment As Outlook.Attachment Dim sSaveFolder As String sSaveFolder = "\\MHO-ITD-SM\Users\smutharaju\Desktop\Ranjith\Outlook Attachments" per ogni oAttachment in MItem.Attachments oAttachment .SaveAsFile sSaveFolder & oAttachment.DisplayName Next End SubDi Srinivas[/quote] Lo stesso qui ho provato tutte le opzioni, sento che lo script è in esecuzione ma non vedo ancora i file caricati nel percorso specificato dal mio computer. Qualcuno mi può aiutare molto apprezzato
Questo commento è stato fatto dal moderatore sul sito
anche lo script sembra non funzionare, tutto è programmato correttamente, il codice ecc. e nessun allegato viene eseguito quando eseguo la regola? in esecuzione in ufficio 2007? qualche idea perchè??
Questo commento è stato fatto dal moderatore sul sito
Ciao, ho provato l'opzione 1 (Scarica automaticamente gli allegati di Outlook nella cartella con VBA e regola) e funziona perfettamente. Ho le seguenti due domande: i) C'è un modo per scaricare lo stesso allegato su più percorsi di condivisione con l'alesaggio del file? ii) Salva anche l'allegato con il cursore su A1 in ogni foglio e dovrebbe essere selezionato il foglio1. Quindi quando apri il file dal foglio del percorso dovrebbe essere aperto con il cursore su A1. Grazie mille in anticipo!! Saluti, Bhavesh Luhana
Questo commento è stato fatto dal moderatore sul sito
Questa regola o simile può essere applicata a una versione webmail di Outlook?
Questo commento è stato fatto dal moderatore sul sito
Ciao, ho provato a seguire i passaggi come indicato. ma non ottengo l'opzione "esegui uno script" dopo aver salvato la macro. Ho abilitato le macro, riavviato Outlook più volte. ma è ancora l'opzione ancora non funziona. Per favore aiuto. Grazie!
Questo commento è stato fatto dal moderatore sul sito
Sono d'accordo con AVNIKA. Ho lo stesso problema Sorry
Questo commento è stato fatto dal moderatore sul sito
Ciao, ho provato a seguire i passaggi come indicato ho selezionato tutte le opzioni di cui sopra ma dopo aver selezionato l'opzione "esegui uno script" e aver selezionato il collegamento "uno script" non ottengo lo script in quella finestra di dialogo. Si prega di aiutare il prima possibile. Grazie!
Questo commento è stato fatto dal moderatore sul sito
Ho avuto lo stesso problema. Ho trovato una soluzione qui: https://answers.microsoft.com/en-us/msoffice/forum/msoffice_outlook-mso_win10/the-option-to-run-a-scritp-has-disappeared-from/d289e698-47fa-497a-80fa-633067a0de37#ThreadAnswers<br /> Una volta che ho aggiornato il mio registro con la chiave... ha ricominciato a funzionare come avrebbe dovuto. Fai un tentativo e vedi se funziona per te.
Questo commento è stato fatto dal moderatore sul sito
grazie, funziona ancora oggi :)
Questo commento è stato fatto dal moderatore sul sito
Grazie mille per i passaggi così chiaramente menzionati.... Questi mi hanno aiutato molto e hanno reso il mio lavoro molto semplice... GRAZIE.....!!
Questo commento è stato fatto dal moderatore sul sito
Funziona molto bene per me Public Sub SaveAttachmentsToDisk(MItem As Outlook.MailItem) Dim oAttachment As Outlook.Attachment Dim sSaveFolder As String sSaveFolder = "\\Dck-server-02\g\00 Uploads\" For Each oAttachment In MItem.Attachments oAttachment.SaveAsFile sSaveFolder & oAttachment.DisplayName Next End Sub Come puoi vedere ho lasciato il nome del file che è l'allegato uguale per quando copia sull'unità di rete. Tuttavia, se arrivano più e-mail con lo stesso nome file per l'allegato, lo script consente all'allegato più recente di sovrascrivere l'allegato precedente nella cartella di rete. C'è una modifica che posso inserire nello script che aggiungerà un "-1" "-2" "-3" ecc... alla fine del nome del file allegato? Quindi, ad esempio, se l'allegato si chiama "ispezione" e ne ottengo più di uno, posso rinominarli in "ispezione-1" "ispezione-2" "ispezione-3" Qualsiasi aiuto sarebbe molto apprezzato! Grazie.
Questo commento è stato fatto dal moderatore sul sito
Ciao Jayaya. Prova a controllare il file prima di salvare. Dim filepath As String filepath = Dir(sSaveFolder & oAttachment.DisplayName) If filepath = "" Then oAttachment.SaveAsFile sSaveFolder & oAttachment.DisplayName Else oAttachment.SaveAsFile sSaveFolder & "1-" & oAttachment.DisplayName Fine se e così via... gioca con il codice e fammi sapere come ti trovi..
Questo commento è stato fatto dal moderatore sul sito
c'è la possibilità di cambiarlo in modo che vengano copiati solo i file che hanno determinate parole nel loro nome?
Questo commento è stato fatto dal moderatore sul sito
Kutools può essere impostato in modo da salvare solo gli allegati di determinate e-mail in base all'oggetto? E lo stesso file può essere salvato in più directory da una singola e-mail? Vogliamo usarlo per la distribuzione dei rapporti invece dell'e-mail.
Questo commento è stato fatto dal moderatore sul sito
Ciao grazie mille questo lavoro ma solo una volta, la prossima volta il file non viene salvato nel disco :( non so perché, qualche idea? grazie
Questo commento è stato fatto dal moderatore sul sito
Ciao, ho lo stesso problema (funziona solo una volta). Potresti risolvere il problema?
Questo commento è stato fatto dal moderatore sul sito
Ciao,
Si prega di verificare se la cartella di destinazione degli allegati di Outlook esiste o meno. E ulteriori informazioni su questo problema saranno utili. Grazie!
Questo commento è stato fatto dal moderatore sul sito
Ciao, devo dire che è una sceneggiatura superba, ha risolto l'80% del mio lavoro ma ho ancora un problema. Gli allegati che ricevo sono con nuova data e ora su base giornaliera e voglio salvare automaticamente questi allegati ma rimuovendo la data/ora in modo che la prossima volta sostituisca/sovrascriva e salvi la nuova copia con lo stesso nome.,Fai non voglio che gli allegati di tutti i giorni vengano salvati con una nuova data. invece lo stesso file deve essere sostituito nella stessa posizione. Per favore, puoi aiutare.
Questo commento è stato fatto dal moderatore sul sito
Ciao a tutti, come posso configurarlo in modo da avere uno script diverso per inviare file a cartelle diverse? Grazie per qualsiasi aiuto offerto in anticipo!
Questo commento è stato fatto dal moderatore sul sito
Ciao, sto configurando lo script che hai nella parte superiore della pagina e funziona bene, tuttavia, vorrei nominare l'allegato salvato in modo che sovrascriva quello vecchio. Cosa dovrei aggiungere per fare in modo che ciò avvenga? Grazie Davide
Questo commento è stato fatto dal moderatore sul sito
Ciao a tutti gli esperti, mi sforzo di impostare il download automatico come descritto sopra utilizzando lo script VBA ma non è stato salvato nulla nella cartella di destinazione. L'ho provato su Outlook 2007 e Outlook 2010 e mi sono anche assicurato che la cartella abbia tutte le autorizzazioni necessarie. Ma ancora nessun singolo allegato è stato salvato. Qualcuno può aiutarmi su questo? Ciao Stanley
Questo commento è stato fatto dal moderatore sul sito
Su Outlook 2013 l'opzione "esegui uno script" non è disponibile posso fare nient'altro per salvare gli allegati da un'e-mail senza usare Kutools
Questo commento è stato fatto dal moderatore sul sito
Se l'opzione per "Esegui uno script" non è presente, è perché ora è bloccata per impostazione predefinita da un aggiornamento di sicurezza di alcuni mesi fa. Guarda qui per maggiori informazioni: https://www.slipstick.com/outlook/rules/outlook-2016-run-a-script-rules/
Questo commento è stato fatto dal moderatore sul sito
Ciao, lo script funziona bene ... ma voglio estrarre i PDF da una sottocartella, non dalla Posta in arrivo principale. C'è un modo per cambiare lo script?
Grazie in anticipo!
Questo commento è stato fatto dal moderatore sul sito
Ciao Eric,
Sotto lo script VBA salverà tutti gli allegati PDF dalle cartelle di posta. Per salvare da una determinata cartella, è possibile specificare la cartella durante l'esecuzione manuale della regola.


Public Sub SaveAttachmentsToDisk(EmailItem As Outlook.MailItem)
Dim xAttachment come Outlook.Attachment
Dim xDotPos come intero
Dim xSavePath As String, xFileType As String
xSavePath = "C:\Utenti\DT168\Documenti\allegati-outlook\"
Per ogni xAttachment in EmailItem.Attachments
xDotPos = InStrRev(xAttachment.DisplayName, ".")
xFileType = Mid(xAttachment.DisplayName, xDotPos, Len(xAttachment.DisplayName) - xDotPos + 1)
Se xFileType = ".pdf" Allora
xAttachment.SaveAsFile xSavePath & xAttachment.DisplayName
End If
Successiva
End Sub
Questo commento è stato fatto dal moderatore sul sito
Ciao, esiste uno script VBA per l'allegato CSV. Al momento ho lavori di segnalazione che vanno automaticamente nelle cartelle denominate in Outlook, ora vorrei che quei file nelle cartelle si estrassero e andassero nelle cartelle corrispondenti sul mio desktop. Spero che questo abbia senso. Per favore aiuto! Sono molto nuovo di VBA.
Questo commento è stato fatto dal moderatore sul sito
Ho eseguito tutti gli script per scaricare gli allegati dalla posta di Outlook e il mio script funziona correttamente quando lo eseguo manualmente. Vorrei automatizzare il processo utilizzando l'opzione Regola. Ma non riuscivo a vedere la mia macro nella finestra della procedura guidata per le regole. Ho abilitato anche l'opzione seguente nel registro
HKEY_CURRENT_USER \ Software \ Microsoft \ Office \ 16.0 \ Outlook \ Security
DWORD: EnableUnsafeClientMailRules
Valore: 1

Ma ancora non riuscivo a vedere la mia macro nell'elenco della procedura guidata per le regole. La mia lista della procedura guidata delle regole è vuota ma ho già creato la macro e funziona manualmente correttamente. Devo portare la macro nella mia procedura guidata Regole per automatizzare il processo. Per favore aiutami se hai qualche idea!
Non ci sono ancora commenti pubblicati qui
Carica Altre
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite

Seguici

Copyright © 2009 - www.extendoffice.com. | Tutti i diritti riservati. Offerto da ExtendOffice, | Mappa del sito
Microsoft e il logo Office sono marchi o marchi registrati di Microsoft Corporation negli Stati Uniti e / o in altri paesi.
Protetto da Sectigo SSL