3 spôsoby stiahnutia všetkých príloh z Outlooku

Prejdite si túto príručku, aby ste sa naučili všetky spôsoby

Ako profesionálny používateľ môže byť sťahovanie množstva príloh z e-mailov prijatých v programe Outlook monotónne a časovo náročné.

Našťastie si v Outlooku môžete jednoducho stiahnuť viacero príloh z jedného e-mailu naraz bez toho, aby ste museli pri každej z nich stlačiť tlačidlo Uložiť. Okrem toho je tiež možné stiahnuť viacero príloh vo viacerých e-mailoch pomocou jednoduchého riešenia.

Ak vás zaujíma postup krok za krokom, zostaňte s nami, keď vás prevedieme postupom.

Ako stiahnem všetky prílohy z e-mailu?

1. Používanie počítačovej aplikácie

1. Spustite Microsoft Outlook aplikáciu na vašom počítači so systémom Windows.
2. Vyhľadajte a otvorte tento e-mail na table na čítanie, z ktorej si stiahnete prílohy.
instagram story viewer
3. Prepnúť na Prílohy z horného panela s ponukami kliknite pravým tlačidlom myši na jednu z príloh súboru v pravej časti a vyberte Uložte všetky prílohy v rozbaľovacej ponuke.
4. Stlačte tlačidlo Ctrl a vyberte všetky prílohy, ktoré chcete stiahnuť v malom dialógovom okne, ktoré sa otvorí.
5. Stlačte tlačidlo OK po výbere požadovaných príloh.
6. Nový Uložiť ako otvorí sa vyskakovacie okno na uloženie príloh. Prejdite do priečinka, do ktorého chcete uložiť súbory s prílohou, a stlačte tlačidlo OK tlačidlo vpravo dole na spustenie sťahovania prílohy.

Môžete jednoducho stiahnuť všetky súbory pripojené k e-mailu naraz namiesto sťahovania každého súboru jednotlivo.

2. Používanie webovej aplikácie

1. Prístup k Webová aplikácia Microsoft Outlook pomocou preferovaného webového prehliadača a po zobrazení výzvy na prihlásenie poskytnite svoje prihlasovacie údaje.
2. Vyberte Doručená pošta z ľavého panela s ponukami v Domov časti webovej aplikácie.
3. Dvojitým kliknutím na príslušný e-mail zobrazíte obsah e-mailu v novom okne.
4. Kliknite na Stiahnuť všetko tlačidlo na stiahnutie príloh vo forme súboru ZIP.
5. Vyberte umiestnenie sťahovania a stlačte tlačidlo OK tlačidlo ak Uložiť ako otvorí sa dialógové okno.

Toto je jednoduchá metóda na stiahnutie všetkých e-mailových príloh z jedného e-mailu, ak uprednostňujete webovú aplikáciu namiesto aplikácie Outlook.

Ako stiahnem všetky prílohy z viacerých e-mailov?

POZNÁMKA

Túto metódu môžete vyskúšať, iba ak používate Outlook 2019, 2016, 2013, 2010, 2007 alebo 2003.

1. Vytvorte nový priečinok

1. Použi Windows + E skratka na spustenie Prieskumník súborov.
2. Prejdite na Dokumenty priečinok z ľavého bočného panela.
3. Kliknite pravým tlačidlom myši kdekoľvek v pravej časti a vyberte si Nový nasledovaný Priečinok z kontextového menu.
4. Dvakrát kliknite na názov priečinka a premenujte ho ako Prílohy.

2. Vytvorte skript VBA

1. Teraz spustite aplikáciu Outlook na počítači so systémom Windows.
2. Vyber Súbor možnosť a potom vyberte možnosti z ľavého bočného panela.
3. Vyberte Prispôsobiť pásku z ľavého panela Možnosti programu Word okno.
4. Vyberte Vývojár možnosť v Hlavné karty a stlačte tlačidlo Plus ikonu na pridanie režimu vývojára do ponuky na páse s nástrojmi programu Outlook.
5. Zatvorte kontextové okno Možnosti programu Word a potom vyberte Režim vývojára nasledovaný Visual Basic z hlavného menu.
6. Vyberte Projekt1 zobrazené ako predvolené a potom vyberte Vložiť nasledovaný modul pre prístup do okna Modul.
7. Teraz skopírujte a prilepte nasledujúci kód Modul1 a zatvorte okno.

Dim GCount As Integer. Dim GFilepath As String. Public Sub SaveAttachments()
'Update 20200821. Dim xMailItem As Outlook.MailItem. Dim xAttachments As Outlook.Attachments. Dim xSelection As Outlook.Selection. Dim i As Long. Dim xAttCount As Long. Dim xFilePath As String, xFolderPath As String, xSaveFiles As String. On Error Resume Next. xFolderPath = CreateObject("WScript.Shell").SpecialFolders(16)
Set xSelection = Outlook.Application.ActiveExplorer.Selection. xFolderPath = xFolderPath & "\Attachments\"
If VBA.Dir(xFolderPath, vbDirectory) = vbNullString Then VBA.MkDir xFolderPath. End If. GFilepath = ""
For Each xMailItem In xSelection Set xAttachments = xMailItem.Attachments xAttCount = xAttachments.Count xSaveFiles = "" If xAttCount > 0 Then For i = xAttCount To 1 Step -1 GCount = 0 xFilePath = xFolderPath & xAttachments.Item(i).FileName GFilepath = xFilePath xFilePath = FileRename(xFilePath) If IsEmbeddedAttachment(xAttachments.Item(i)) = False Then xAttachments.Item(i).SaveAsFile xFilePath If xMailItem.BodyFormat <> olFormatHTML Then xSaveFiles = xSaveFiles & vbCrLf & "" Else xSaveFiles = xSaveFiles & "
" & "" & xFilePath & "" End If End If Next i End If. Next. Set xAttachments = Nothing. Set xMailItem = Nothing. Set xSelection = Nothing. End Sub Function FileRename(FilePath As String) As String. Dim xPath As String. Dim xFso As FileSystemObject. On Error Resume Next. Set xFso = CreateObject("Scripting.FileSystemObject")
xPath = FilePath. FileRename = xPath. If xFso.FileExists(xPath) Then GCount = GCount + 1 xPath = xFso.GetParentFolderName(GFilepath) & "\" & xFso.GetBaseName(GFilepath) & " " & GCount & "." + xFso.GetExtensionName(GFilepath) FileRename = FileRename(xPath)
End If. xFso = Nothing. End Function Function IsEmbeddedAttachment(Attach As Attachment)
Dim xItem As MailItem. Dim xCid As String. Dim xID As String. Dim xHtml As String. On Error Resume Next. IsEmbeddedAttachment = False. Set xItem = Attach.Parent. If xItem.BodyFormat <> olFormatHTML Then Exit Function. xCid = ""
xCid = Attach.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001F")
If xCid <> "" Then xHtml = xItem.HTMLBody xID = "cid:" & xCid If InStr(xHtml, xID) > 0 Then IsEmbeddedAttachment = True End If. End If. End Function

3. Spustite skript VBS

1. Prepnúť na Režim vývojára a potom vyberte Visual Basic z pásu s nástrojmi programu Outlook.
2. Vyberte Modul1 a zasiahnuť F5 kľúč na spustenie kódu.
3. Kliknite na Uložiť prílohu po výbere príloh potvrďte akciu.

Skripty VBA vám umožňujú automatizovať proces sťahovania príloh v programe Microsoft Outlook. So skriptami VBA by ste však mali postupovať opatrne, aby ste predišli poškodeniu počítača.

To je všetko v tomto návode! Dúfame, že poznáte rôzne spôsoby, ako si môžete jednoducho stiahnuť všetky prílohy e-mailov z aplikácie Microsoft Outlook.

Ak narazíte na V programe Outlook sa vyskytla chyba aplikáciu, vyskúšajte riešenia navrhnuté v tejto príručke.

Ak máte nejaké otázky alebo viete o iných metódach, dajte nám vedieť v sekcii komentárov.