3 moduri de a descărca toate atașamentele din Outlook

Parcurgeți acest ghid pentru a afla toate modalitățile

  • Microsoft vă permite să descărcați toate atașamentele atașate la e-mail dintr-o singură mișcare.
  • De asemenea, puteți descărca atașamente din mai multe atașamente folosind codul VB.
  • Parcurgeți acest ghid pentru a afla procesul pas cu pas pentru a descărca mai multe atașamente.
Outlook descărcați toate atașamentele

Ca utilizator profesionist, descărcarea de tone de atașamente din e-mailurile primite în Outlook poate fi monotonă și consumatoare de timp.

Din fericire, puteți descărca cu ușurință mai multe atașamente dintr-un e-mail în Outlook simultan, fără a fi nevoie să apăsați butonul Salvare pentru fiecare dintre ele. În plus, este, de asemenea, posibil să descărcați mai multe atașamente prezente în mai multe e-mailuri printr-o soluție simplă.

Dacă sunteți curios să cunoașteți procedura pas cu pas, rămâneți cu noi în timp ce vă ghidăm prin procedură.

Cum descarc toate atașamentele dintr-un e-mail?

1. Folosind aplicația desktop

  1. Lansați Microsoft Outlook aplicația pe computerul dvs. cu Windows.
  2. Căutați și deschideți acel e-mail în panoul de citire din care descărcați atașamentele.
  3. Comutați la Atasamente secțiunea din bara de meniu de sus, faceți clic dreapta pe unul dintre fișierele atașate din secțiunea din dreapta și selectați Salvați toate atașamentele în meniul derulant.
  4. apasă pe Ctrl tasta și selectați toate atașamentele pe care doriți să le descărcați în caseta de dialog mică care se deschide.
  5. apasă pe Bine butonul după selectarea atașamentelor necesare.
  6. Un nou Salvează ca se va deschide o fereastră pop-up pentru a salva atașamentele. Navigați la folderul în care doriți să salvați fișierele atașate și apăsați tasta Bine butonul din dreapta jos pentru a iniția descărcarea atașamentului. Outlook descărcați toate atașamentele

Puteți descărca cu ușurință toate fișierele atașate unui e-mail simultan, în loc să descărcați fiecare fișier individual.

2. Folosind aplicația web

  1. Accesați Aplicația web Microsoft Outlook utilizând browserul web preferat și furnizați acreditările dvs. de conectare atunci când vi se solicită să vă conectați.
  2. Selectează Inbox folder din bara de meniu din stânga din Acasă secțiunea aplicației web. Outlook descărcați toate atașamentele
  3. Faceți dublu clic pe e-mailul în cauză pentru a vedea conținutul e-mailului într-o fereastră nouă.
  4. Apasă pe Descarca toate butonul pentru a descărca atașamentele sub forma unui fișier ZIP. Outlook descărcați toate atașamentele
  5. Alegeți locația de descărcare și apăsați tasta Bine butonul dacă Salvează ca se deschide caseta de dialog.

Aceasta este o metodă simplă de a descărca toate atașamentele de e-mail dintr-un singur e-mail dacă preferați aplicația web în loc de aplicația Outlook.

Cum descarc toate atașamentele din mai multe e-mailuri?

Pictograma notăNOTĂ

Puteți încerca această metodă numai dacă utilizați Outlook 2019, 2016, 2013, 2010, 2007 sau 2003.

1. Creați un folder nou

  1. Folosește Windows + E scurtătură pentru lansare Explorator de fișiere.
  2. Navigați la Documente folder din bara laterală din stânga.
  3. Faceți clic dreapta oriunde în secțiunea din dreapta și alegeți Nou urmată de Pliant din meniul contextual. Outlook descărcați toate atașamentele
  4. Faceți dublu clic pe numele folderului și redenumiți-l ca Atasamente.

2. Creați un script VBA

  1. Acum lansați aplicația Outlook pe computerul dvs. Windows.
  2. Alege Fişier opțiunea și apoi selectați Opțiuni din bara laterală din stânga.
  3. Selectați Personalizați panglica din panoul din stânga al Opțiuni Word fereastră. Outlook descărcați toate atașamentele
  4. Selectează Dezvoltator opțiunea în Filele principale și apăsați tasta La care se adauga pictograma pentru a adăuga modul Dezvoltator la meniul panglică Outlook.
  5. Închideți fereastra pop-up Opțiuni Word și apoi selectați Modul dezvoltator urmată de Visual Basic din meniul principal.
  6. Selectați Proiect1 afișat implicit și apoi selectați Introduce urmată de Modul pentru a accesa fereastra Modulului.
  7. Acum copiați și inserați următorul cod în Modulul 1 si inchide fereastra.
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. Rulați scriptul VBS

  1. Comutați la Modul dezvoltator și apoi selectați Visual Basic din panglica Outlook. Outlook descărcați toate atașamentele
  2. Selectați Modulul 1 și loviți F5 tasta pentru a rula codul.
  3. Apasă pe Salvați atașamentul butonul după selectarea atașamentelor pentru a confirma acțiunea.

Scripturile VBA vă permit să automatizați procesul de descărcare a atașamentelor în Microsoft Outlook. Cu toate acestea, ar trebui să procedați cu atenție cu scripturile VBA pentru a evita deteriorarea computerului.

Asta este tot în acest ghid! Sper că știți diferitele moduri în care puteți descărca cu ușurință toate atașamentele de e-mail din aplicația Microsoft Outlook.

Dacă dai de Ceva a mers prost eroare în Outlook aplicație, încercați soluțiile sugerate în acest ghid.

Dacă aveți întrebări sau știți despre alte metode, anunțați-ne în secțiunea de comentarii.

Remediați folderul de schițe lipsă din panoul de navigare din Outlook

Remediați folderul de schițe lipsă din panoul de navigare din OutlookOutlook

Outlook.com este un serviciu de e-mail extrem de popular de către Microsoft și este utilizat de milioane de utilizatori din întreaga lume. Deși este cunoscut pentru funcțiile sale adăugate, vine și...

Citeste mai mult
Cum se remediază notificarea „Setările contului dvs. Outlook sunt învechite”

Cum se remediază notificarea „Setările contului dvs. Outlook sunt învechite”Cum SăOutlookWindows 10

Notificarea Setările contului dvs. Outlook sunt depășite se poate întâmpla din diverse motive. În acest articol, am încercat să acoperim aproape toate motivele pentru care această notificare v-ar p...

Citeste mai mult
Remediați Nu primiți alerte de e-mail noi în Outlook 2016/2013 pe Windows 10

Remediați Nu primiți alerte de e-mail noi în Outlook 2016/2013 pe Windows 10OutlookWindows 10

Microsoft Outlook este o aplicație bazată pe servicii de webmail care face parte integrantă din serviciile Windows MSN de la Windows 2000. De atunci, aplicația s-a schimbat foarte mult, a devenit m...

Citeste mai mult