Hvordan batchlagre alle vedlegg i en Outlook-oppgave til en Windows-mappe

Hvis en Outlook-oppgave inneholder mange vedlegg, for å trekke ut og lagre dem i en lokal mappe, må du generelt lagre dem én etter én manuelt. Likevel, i denne artikkelen vil vi introdusere en metode for å batchlagre alle vedlegg på én gang.

Noen ganger kan du få en oppgave tildelt fra noen andre. Og denne oppgaven kan inneholde flere viktige vedlegg i kroppen. I møte med en slik oppgave, må du kanskje trekke ut og lagre disse vedleggene i en Windows-mappe. Likevel, i motsetning til e-post, kan du ikke lagre dem i grupper som standard. Outlook lar deg bare lagre en etter en. Det er klart at det blir for kjedelig hvis det er for mange vedlegg. Derfor vil vi her introdusere en måte å la deg utføre denne oppgaven i bulk.

Batch-lagre alle vedlegg i en oppgave i en Windows-mappe

  1. Start Outlook-applikasjonen helt i begynnelsen.
  2. Deretter utløser du Outlook VBA-editor med referanse til "Hvordan kjøre VBA-kode i Outlook".
  3. Deretter kopierer du følgende kode inn i en ubrukt modul.
Sub BatchSaveAttachmentsFromTask() Dim objTask As Outlook.TaskItem Dim objShell, objWindowsFolder As Object Dim strWindowsFolder As String Dim objAttachment As Outlook.Attachment Dim strFolder, strFilePath As String 'Få oppgaven Velg Case Outlook.Application.AcspectIn ActiveInspector.CurrentItem Case olExplorer Set objTask = ActiveExplorer.Selection.Item(1) End Velg 'Velg en Windows-mappe for å lagre utpakkede vedlegg Set objShell = CreateObject("Shell.Application") Sett objWindowsFolder = objShell.BrowseForSelect a(0," mappe for å lagre Tasks vedlegg:", 0, "") If Not objWindowsFolder Is Nothing Then strWindowsFolder = objWindowsFolder.self.Path & "\" If objTask.Attachments.Count > 0 Then For Every objAttachment In objTask.Attachments strFilePath = strWindowsFold & objAttachment.FileName objAttachment.SaveAsFile strFilePath Next End If Shell "Explorer.exe" & " " & strWindowsFolder, vbNormalFocus End If End Sub

VBA-kode - Batch-lagre alle vedlegg i en oppgave i en Windows-mappe

  1. Avslutt deretter VBA-redigeringsprogrammet.
  2. Deretter legger du til denne makroen på verktøylinjen eller båndet for hurtigtilgang.
  3. Til slutt kan du prøve.
  • Først av alt, velg eller åpne en oppgave.
  • Klikk deretter på den nylig lagt til makroknappen.Kjør makro på oppgave
  • I popup-dialogboksen velger du en Windows-mappe i henhold til dine behov.
  • Etterpå klikker du "OK".Velg Windows-mappe
  • Med en gang vil Windows-mappen vises, der du kan finne de utpakkede vedleggene.Lagrede vedlegg

Håndter forstyrrende Outlook-problemer

Som vi alle vet, er Outlook PST-filen utsatt for ulike feil og korrupsjon. Hvis du for eksempel ofte lukker Outlook på feil måte eller laster ned skadelige filer, kan Outlook PST-filen din bli utilgjengelig en dag. På den tiden kan ikke engang reparasjonsverktøyet for innboksen hjelpe deg. Det du kan ty til er mer erfarent og pålitelig PST-fiks programvare, som DataNumen Outlook Repair. Det kan trekke ut maksimale Outlook-data fra en PST-fil på rask tid.

Forfatterintroduksjon:

Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert fastsette SQL Server og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med

Kommentarer er stengt.