Note: The other languages of the website are Google-translated. Back to English

Hur laddar jag ner / sparar bilagor automatiskt från Outlook till en viss mapp?

Generellt kan du spara alla bilagor i ett e-postmeddelande genom att klicka bilagor > Spara alla bilagor i Outlook. Men om du behöver spara alla bilagor från alla mottagna e-postmeddelanden och mottagna e-postmeddelanden, några idéer? Den här artikeln kommer att introducera två lösningar för att automatiskt ladda ner bilagor från Outlook till en viss mapp.


Ladda ner Outlook-bilagor automatiskt till mapp med VBA och regel

Denna metod introducerar ett VBA-skript och kör det här skriptet med en regel för att automatiskt ladda ner och spara Outlook-bilagor i en viss mapp. Gör så här:

1. Tryck andra + F11 för att öppna Microsoft Visual Basic for Applications-fönstret.

2. Klicka Insert > Modulernaoch klistra sedan in under VBA-skriptet i det nya öppningsmodulfönstret.

VBA: Spara automatiskt Outlook-bilagor i en viss mapp

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

Anmärkningar: Ta reda på det sSaveFolder = "C: \ Användare \ DT168 \ Dokument \ Outlook-bilagor \"och byt ut målmappens sökväg efter behov.

3. Spara VBA-skriptet och stäng fönstret Microsoft Visual Basic for Applications.

4. Gå till Post visa och klicka Hem > regler > Hantera regler och varningar. Se skärmdump:

5. Klicka på rutan i dialogrutan Regler och varningar Ny regel knappen på E-postregler flik. Se skärmdump:

6. Klicka nu i dialogrutan Regelguide för att välja Använd regel för meddelanden jag får alternativet och klicka på Nästa knapp.

7. Avmarkera valet i dialogrutan Regler (vilka villkor vill du kontrollera?), Och klicka på Nästa knapp. Och klicka sedan på Ja i popup-dialogrutan Microsoft Outlook. Se skärmdump:

8. Nu i dialogrutan Regelguiden (vad vill du göra med meddelandet?): (1) Kontrollera kör ett skript alternativ; (2) Klicka på texten till ett manus för att öppna dialogrutan Välj skript, välj skriptet vi lade till i steg 2 och klicka på OK knapp; (3) Klicka på Nästa knapp.

9. Klicka på i dialogrutan Regelguiden (finns det några undantag?) Nästa knappen direkt.

10. Nu i den senaste dialogrutan Regelguide, vänligen namnge regeln i steg 1 kryssrutan, markera alternativ som du behöver i steg 2 avsnittet och klicka på Finish knapp.

11. Stäng dialogrutan Regler och varningar.

Och nu laddas alla bilagor ned från ditt e-postkonto och sparas i den angivna målmappen. Och alla bilagor till inkommande e-postmeddelanden laddas ned automatiskt och sparas i den angivna mappen.


Ladda ner Outlook-bilagor automatiskt till mappen med Kutools for Outlook

Om du har Kutools för Outlook installerat kan du använda det Auto Lossa möjlighet att automatiskt ladda ner alla Outlook-bilagor och enkelt spara i en viss mapp.

Kutools för Outlook: Lägg till mer än 100 praktiska verktyg för Outlook, gratis att prova utan begränsning på 60 dagar. Läs mer      Gratis testversion nu

1. Klicka Kutools > Auto Lossa > aktivera för att aktivera funktionen Auto Lossa.

2. Fortsätt för att klicka Kutools > Auto Lossa > Auto Loss Manager.

3. Kontrollera kryssrutan i dialogrutan Auto avlägsna bilagor Ta bort alla mottagna bilagor automatiskt och konfigurera sedan enligt följande:
(1) Klicka på bläddringsknappen  för att ange destinationsmappen för att spara automatiskt borttagna bilagor;
(2) Det är valfritt att kontrollera Skapa undermappar i följande stil alternativet och välj sedan en undermappsstil från rullgardinsmenyn nedan;
(3) Det är valfritt att kontrollera den enda lossnar redskapen med följande förlängning alternativet och skriv sedan bifogade filtillägg i rutan nedan;
(4) Det är valfritt att kontrollera Bilaga-ikonen finns fortfarande kvar i e-postmeddelandena alternativ.

Anmärkningar: Om du behöver ta bort bilagor automatiskt av avsändare kan du kontrollera Ta bort bilagor automatiskt enligt regler klicka på Ny -knappen och skriv sedan avsändarens e-postadress och ange målmapp i den andra dialogrutan för automatisk avskiljning av bilagor.

4. Klicka på Ok knappen för att spara inställningarna.

Från och med nu sparas alla bilagor (eller bilagor med angivna filtillägg eller bilagor från angivna avsändare baserat på dina inställningar) automatiskt.

Anmärkningar: Du kan använda Kutools för Outlook Lossa alla (Bilagor) -funktionen eller Rädda alla (Bilagor) -funktion för att snabbt ladda ner / spara alla bilagor från flera / alla mottagna e-postmeddelanden i Outlook.


Demo: Ladda ner Outlook-bilagor automatiskt till mappen med Kutools för Outlook


Tips: I denna video, Kutools fliken läggs till av Kutools för Outlook. Klicka på om du behöver det här att ha en 60-dagars gratis testperiod utan begränsning!


Relaterade artiklar:


Kutools for Outlook - ger 100 avancerade funktioner till Outlook och gör arbetet mycket enklare!

  • Auto CC / BCC enligt regler när du skickar e-post; Automatisk vidarebefordran Flera e-postmeddelanden efter anpassning; Auto-svar utan växelserver och mer automatiska funktioner ...
  • BCC-varning - visa meddelande när du försöker svara på alla om din e-postadress finns i BCC-listan; Påminn när du saknar bilagor, och mer påminna om funktioner ...
  • Svara (alla) med alla bilagor i e-postkonversationen; Svara många e-postmeddelanden inom sekunder; Lägg automatiskt till hälsning när svar Lägg till datum i ämnet ...
  • Bilagverktyg: Hantera alla bilagor i alla e-postmeddelanden, Auto Lossa, Komprimera alla, Byt namn på alla, Spara alla ... Snabbrapport, Räkna valda mejl...
  • Kraftfulla skräppost efter anpassning; Ta bort duplicerade e-postmeddelanden och kontakter... Gör det möjligt för dig att göra smartare, snabbare och bättre i Outlook.
shot kutools outlook kutools flik 1180x121
shot kutools outlook kutools plus flik 1180x121
 
Sortera kommentarer efter
Kommentarer (104)
Inga betyg än. Bli först med att betygsätta!
Denna kommentar minimerades av moderatoren på webbplatsen
Hej alla Skriptet fungerar inte för mig. Jag har något annat som måste göras. 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 Attachment" I varje MIAttachment.Attachment .SaveAsFile sSaveFolder & oAttachment.DisplayName Next End Sub
Srinivas
Denna kommentar minimerades av moderatoren på webbplatsen
Hej SRINIVAS, jag tror att du måste lägga till Drive-bokstaven i början av din länk. dvs C:\users\test\etc Hoppas detta hjälper! Andrew
Andrew
Denna kommentar minimerades av moderatoren på webbplatsen
I VBA måste du också lägga till ett sista snedstreck i slutet av din filsökväg. Som följer. "D:\OutlookAttachments\" Hoppas detta löser eventuella problem. Matt
Matt
Denna kommentar minimerades av moderatoren på webbplatsen
HI

VBA-skriptet fungerade utmärkt för mig... en gång - aldrig mer.

Jag tog till och med bort filerna i mappen och körde igen och ingenting.

Vad gör jag fel ? - Regeln körs när jag får den att visa en varning samtidigt
Dave Brammer
Denna kommentar minimerades av moderatoren på webbplatsen
[quote]Hej alla. Skriptet fungerar inte för mig. Jag har något annat som måste göras. 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 Attachment" I varje MIAttachment.Attachment .SaveAsFile sSaveFolder & oAttachment.DisplayName Next End SubAv Srinivas[/quote] Samma här försökte jag alla alternativ Jag känner att skriptet körs men jag ser fortfarande inte filer som laddas i min datorspecifika sökväg. Kan någon hjälpa mig mest uppskattat
Kalyan
Denna kommentar minimerades av moderatoren på webbplatsen
skriptet verkar inte fungera heller, allt är programmerat bra, koden etc. och inga bilagor går igenom när jag kör regeln?? körs på office 2007? några idéer varför??
Danny
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, jag har provat alternativ 1 (Hämta automatiskt Outlook-bilagor till mapp med VBA och regel) och det fungerar perfekt. Jag har följande två frågor: i) Finns det ett sätt för outllook att ladda ner samma bilaga på flera delade sökvägar med att röja filen? ii) Den sparar också bilagor med markören på A1 i varje blad och ark1 bör väljas. Så när du öppnar filen från sökvägen bör den vara öppen med markören på A1. Tack så mycket på förhand!! Hälsningar, Bhavesh Luhana
Bhavesh Luhana
Denna kommentar minimerades av moderatoren på webbplatsen
Kan denna regel eller liknande tillämpas på en webbmailversion av Outlook?
Eugene
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, jag har försökt följa stegen enligt anvisningarna. men jag får inte alternativet "kör ett skript" efter att ha sparat makrot. Jag har aktiverat makron, startat om outlook flera gånger. men det fortfarande alternativet fortfarande inte fungerar. Snälla hjälp. Tack!
Avnika Rastogi
Denna kommentar minimerades av moderatoren på webbplatsen
Jag håller med AVNIKA. Jag har samma problem :-|
Dinushe
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, jag har försökt följa stegen enligt anvisningarna, jag valde alla ovanstående alternativ men efter att ha valt alternativet "kör ett skript" och valt länken "ett skript" får jag inte upp skriptet i den dialogrutan. Vänligen hjälp så snart som möjligt. Tack!
Harsha
Denna kommentar minimerades av moderatoren på webbplatsen
Jag hade samma problem. Jag hittade en lösning här: 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 /> När jag uppdaterade mitt register med nyckeln... började det fungera som det var tänkt igen. Ge det ett försök och se om det fungerar för dig.
Dean
Denna kommentar minimerades av moderatoren på webbplatsen
Tack så mycket för de så tydligt nämnda stegen.... Dessa hjälpte mig mycket och gjorde mitt jobb väldigt enkelt... TACK.....!!
Harsha
Denna kommentar minimerades av moderatoren på webbplatsen
Detta fungerar riktigt bra för mig Public Sub SaveAttachmentsToDisk(MItem As Outlook.MailItem) Dim oAttachment As Outlook.Attachment Dim sSaveFolder As String sSaveFolder = "\\Dck-server-02\g\00 Uppladdningar\" För varje oAttachment I MItem.Attachments oAttachment.SaveAsFile sSaveFolder & oAttachment.DisplayName Next End Sub Som du kan se har jag lämnat filnamnet som är bilagan som detsamma när den kopieras till nätverksenheten. Men om flera e-postmeddelanden kommer fram med samma filnamn för bilagan tillåter skriptet att den senaste bilagan skriver över den tidigare bilagan i nätverksmappen. Finns det en redigering som jag kan mata in i skriptet som kommer att lägga till en "-1" "-2" "-3" osv... i slutet av den bifogade filnamnet? Så till exempel, om bilagan heter "inspektion" och jag får flera som kommer igenom kan jag få dem byta namn till "inspektion-1" "inspektion-2" "inspektion-3" All hjälp skulle uppskattas SÅ MYCKET! Tack.
Janayah
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Jayayah. Försök att kontrollera filen innan du sparar. Dim filsökväg As String filsökväg = Dir(sSaveFolder & oAttachment.DisplayName) Om filsökväg = "" Då oAttachment.SaveAsFile sSaveFolder & oAttachment.DisplayName Else oAttachment.SaveAsFile sSaveFolder & "1-" & oAttachment.SaveAsFile... End. lek med koden och låt mig veta hur det går..
Bob
Denna kommentar minimerades av moderatoren på webbplatsen
finns det någon möjlighet att ändra detta så att bara filer som har vissa ord i sitt namn kopieras?
fabian
Denna kommentar minimerades av moderatoren på webbplatsen
Kan Kutools ställas in så att det bara sparar bilagor från vissa e-postmeddelanden baserat på ämnet? Och kan samma fil sparas i flera kataloger från ett enda e-postmeddelande? Vi vill använda detta för rapportdistribution istället för e-post.
Jess
Denna kommentar minimerades av moderatoren på webbplatsen
Hej tack så mycket detta fungerar men bara en gång, nästa gång sparas inte filen på disken :( Jag vet inte varför, någon aning? tack
marcos
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, jag har samma problem (det fungerar bara en gång). Skulle du kunna lösa problemet?
enligt min mening
Denna kommentar minimerades av moderatoren på webbplatsen
Hej,
Kontrollera om målmappen outlook-attachments existerar eller inte. Och mer information om detta problem kommer att vara till hjälp. Tack!
Teknisk support
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, jag måste säga dess fantastiska manus, det löste 80 % av mitt arbete men jag har fortfarande ett problem. Bilagorna jag får är med nytt datum och tidsstämpel på daglig basis och jag vill automatiskt spara dessa bilagor men genom att ta bort datum/tidsstämpeln så att nästa gång den kommer att ersätta/skriva över och spara ny kopia med samma namn.,Gör vill inte att bilagor varje dag sparas med nytt datum. istället måste samma fil ersättas på samma plats. Kan du snälla hjälpa till.
vandy
Denna kommentar minimerades av moderatoren på webbplatsen
Hej alla, Hur kan jag ställa in detta så att jag har ett annat skript för att skicka filer till olika mappar? Tack för all hjälp som erbjuds i förväg!
Nathan
Denna kommentar minimerades av moderatoren på webbplatsen
Hej jag ställer in skriptet du har högst upp på sidan och det fungerar OK, dock skulle jag vilja namnge bilagan som sparas så att den skriver över den gamla. Vad skulle jag behöva lägga till för att detta ska hända? Tack David
David
Denna kommentar minimerades av moderatoren på webbplatsen
Hej alla experter, jag försöker ställa in den automatiska nedladdningen enligt beskrivningen ovan genom att använda VBA-skript men ingenting har sparats i målmappen. Jag provade detta på Outlook 2007 och Outlook 2010, och se också till att mappen har alla nödvändiga behörigheter. Men fortfarande har ingen enskild bilaga sparats. Kan någon hjälpa mig med detta? Heja Stanley
Stanley
Denna kommentar minimerades av moderatoren på webbplatsen
I Outlook 2013 är alternativet "kör ett skript" inte tillgängligt kan jag göra något annat för att spara bilagor från ett e-postmeddelande utan att använda Kutools
Ndesouza
Denna kommentar minimerades av moderatoren på webbplatsen
Om alternativet för "Kör ett skript" saknas beror det på att det är blockerat som standard nu sedan en säkerhetsuppdatering för några månader sedan. Titta här för mer information: https://www.slipstick.com/outlook/rules/outlook-2016-run-a-script-rules/
WarrenDB
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, skriptet fungerar bra ... men vill extrahera PDF-filerna från en undermapp, inte från huvudinkorgen. Finns det något sätt att ändra skriptet?
Tack på förhand !
Erik VT
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Eric,
Nedan VBA-skript kommer att spara alla PDF-bilagor från e-postmappar. För att spara från en viss mapp kan du ange mappen när du kör regeln manuellt.


Public Sub SaveAttachmentsToDisk(EmailItem As Outlook.MailItem)
Dim xAttachment As Outlook.Attachment
Dim xDotPos Som heltal
Dim xSavePath As String, xFileType As String
xSavePath = "C:\Users\DT168\Documents\outlook-attachments\"
För varje xBilaga i EmailItem.Attachments
xDotPos = InStrRev(xAttachment.DisplayName, "."")
xFileType = Mid(xAttachment.DisplayName, xDotPos, Len(xAttachment.DisplayName) - xDotPos + 1)
Om xFileType = ".pdf" Då
xAttachment.SaveAsFile xSavePath &amp; xAttachment.DisplayName
End If
Nästa
End Sub
Teknisk support
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, Finns det ett VBA-skript för CSV-bilaga. Jag har för närvarande rapportjobb som automatiskt går in i namngivna mappar i outlook. Jag skulle nu vilja ha för de filerna i mapparna extrahera sig själva och gå in i motsvarande mappar på mitt skrivbord. Hoppas detta är vettigt. Snälla hjälp! Jag är väldigt ny på VBA.
Raynardo Pardo
Denna kommentar minimerades av moderatoren på webbplatsen
Jag har gjort allt skript för att ladda ner bilagorna från Outlook Mail och mitt skript fungerar bra när jag kör det manuellt. Jag skulle vilja automatisera processen med alternativet Regel. Men jag kunde inte se mitt makro i Rules Wizard-fönstret. Jag har också aktiverat alternativet nedan i registret
HKEY_CURRENT_USER \ Software \ Microsoft \ Office \ 16.0 \ Outlook \ Security
DWORD: EnableUnsafeClientMailRules
Värde: 1

Men jag kunde fortfarande inte se mitt makro i Rule Wizard-listan. Min lista med regelguide är tom men jag har redan skapat makrot och det fungerar bra manuellt. Jag måste ta med makrot i min regelguide för att automatisera processen. Snälla hjälp mig om du har några idéer!
Dhinesh
Det finns inga kommentarer här ännu
Ladda fler
Lämna dina kommentarer
Postar som gäst
×
Betygsätt detta inlägg:
0  Tecken
Föreslagna platser