3 tapaa ladata kaikki liitteet Outlookista

Käy läpi tämä opas oppiaksesi kaikki tavat

Ammattikäyttäjänä lukuisten liitteiden lataaminen Outlookiin saapuneista sähköposteista voi olla yksitoikkoista ja aikaa vievää.

Onneksi voit helposti ladata useita liitteitä yhdestä sähköpostista Outlookissa kerralla ilman, että sinun tarvitsee painaa kunkin liitteen Tallenna-painiketta. Lisäksi on myös mahdollista ladata useita useissa sähköpostiviesteissä olevia liitteitä yksinkertaisen kiertotavan avulla.

Jos olet utelias tietämään vaiheittaiset menettelyt, pysy kanssamme, kun opastamme sinua prosessin läpi.

Kuinka lataan kaikki liitteet sähköpostista?

1. Työpöytäsovelluksen käyttäminen

1. Käynnistä Microsoft Outlook sovellus Windows-tietokoneellasi.
2. Etsi ja avaa sähköposti lukuruudusta, josta lataat liitteet.
3. Vaihda kohtaan
   instagram story viewer
   Liitteet -osio ylävalikkopalkista, napsauta hiiren kakkospainikkeella jotakin oikeanpuoleisen osan liitetiedostoa ja valitse Tallenna kaikki liitteet avattavassa valikossa.
4. paina Ctrl -näppäintä ja valitse avautuvasta pienestä valintaikkunasta kaikki liitteet, jotka haluat ladata.
5. paina OK -painiketta, kun olet valinnut tarvittavat liitteet.
6. Uusi Tallenna nimellä ponnahdusikkuna liitteiden tallentamiseksi avautuu. Selaa kansioon, johon haluat tallentaa liitetiedostot ja paina OK -painiketta oikeassa alakulmassa aloittaaksesi liitteen latauksen.

Voit helposti ladata kaikki sähköpostiin liitetyt tiedostot kerralla sen sijaan, että lataat jokaista tiedostoa erikseen.

2. Verkkosovelluksen käyttäminen

1. Käytä Microsoft Outlook -verkkosovellus käyttämällä haluamaasi verkkoselainta ja anna kirjautumistietosi, kun sinua pyydetään kirjautumaan sisään.
2. Valitse Saapuneet -kansion vasemmasta valikkopalkista Koti verkkosovelluksen osio.
3. Kaksoisnapsauta kyseistä sähköpostiviestiä nähdäksesi sähköpostin sisällön uudessa ikkunassa.
4. Klikkaa Lataa kaikki -painiketta ladataksesi liitteet ZIP-tiedostona.
5. Valitse latauspaikka ja paina OK -painiketta, jos Tallenna nimellä valintaikkuna avautuu.

Tämä on yksinkertainen tapa ladata kaikki sähköpostin liitteet yhdestä sähköpostista, jos haluat käyttää verkkosovellusta Outlook-sovelluksen sijaan.

Kuinka lataan kaikki liitteet useista sähköpostiviesteistä?

HUOMAUTUS

Voit kokeilla tätä menetelmää vain, jos käytössäsi on Outlook 2019, 2016, 2013, 2010, 2007 tai 2003.

1. Luo uusi kansio

1. Käytä Windows + E pikakuvake käynnistämiseen Tiedostonhallinta.
2. Navigoi kohtaan Asiakirjat kansio vasemmasta sivupalkista.
3. Napsauta hiiren kakkospainikkeella mitä tahansa oikean osan kohtaa ja valitse Uusi jonka jälkeen Kansio kontekstivalikosta.
4. Kaksoisnapsauta kansion nimeä ja nimeä se uudelleen nimellä Liitteet.

2. Luo VBA-skripti

1. Käynnistä nyt Outlook-sovellus Windows-tietokoneellasi.
2. Valitse Tiedosto vaihtoehto ja valitse sitten Vaihtoehdot vasemmasta sivupalkista.
3. Valitse Mukauta nauhaa vasemmasta paneelista Wordin asetukset ikkuna.
4. Valitse Kehittäjä vaihtoehto kohdassa Päävälilehdet ja paina Plus -kuvaketta lisätäksesi kehittäjätilan Outlookin nauhavalikkoon.
5. Sulje Wordin asetukset -ponnahdusikkuna ja valitse sitten Kehittäjätila jonka jälkeen Visual Basic päävalikosta.
6. Valitse Projekti 1 näytetään oletuksena ja valitse sitten Lisää jonka jälkeen Moduuli päästäksesi moduuli-ikkunaan.
7. Kopioi ja liitä nyt seuraava koodi Moduuli 1 ja sulje ikkuna.

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. Suorita VBS-skripti

1. Vaihda kohtaan Kehittäjätila ja valitse sitten Visual Basic Outlook-nauhasta.
2. Valitse Moduuli 1 ja osui F5 avain koodin suorittamiseen.
3. Klikkaa Tallenna liite -painiketta, kun olet valinnut liitteet toiminnon vahvistamiseksi.

VBA-komentosarjojen avulla voit automatisoida liitteiden latausprosessin Microsoft Outlookissa. Sinun tulee kuitenkin edetä huolellisesti VBA-komentosarjojen kanssa, jotta et vahingoita tietokonettasi.

Siinä kaikki tässä oppaassa! Toivottavasti olet tietoinen eri tavoista, joilla voit helposti ladata kaikki sähköpostin liitteet Microsoft Outlook -sovelluksesta.

Jos törmäät Jotain meni pieleen -virhe Outlookissa sovellusta, kokeile tässä oppaassa ehdotettuja ratkaisuja.

Jos sinulla on kysyttävää tai tiedät muista menetelmistä, kerro siitä meille kommenttiosiossa.