Å ha kunnskap om hvordan du kan lagre e-postvedlegg ved hjelp av Visual Basic for Applications ( VBA ) kan du spare tid når du arbeider med vedlegg. Du kan bruke VBA i noen av Microsoft Office-programmer for å automatisere prosesser som lagring e-postvedlegg fra Outlook . I noen få skritt , kan du skrive VBA -kode for å lagre e-postvedlegg i en bestemt mappe på datamaskinen . Instruksjoner
en
Start Microsoft Access 2007 , velg "Database Tools " og klikk på " Visual Basic. " Klikk på " Verktøy "-menyen og velg " Referanser . " Kryss av i boksen ved siden av " Microsoft Outlook 12.0 Object Library " og velg
2
Skriv inn følgende for å opprette en sub " OK ". :
Gå getOutlookAttachments ( )
< p> Trykk på "Enter"
3
Skriv inn følgende for å opprette variabler : en
Dim navnerom som navnerommet
Dim InboxFolder Som MAPIFolder
Dim outlookItem som objekt
Dim mailAttachment Som Outlook.Attachment
Dim fname As String
4
Skriv inn følgende for å definere variabler :
Set namespace = GetNamespace ( " MAPI ")
Set InboxFolder = nameSpace.GetDefaultFolder ( olFolderInboxFolder )
5
Skriv inn følgende å sløyfe gjennom innboksen mappen , søk etter vedlegg og lagre dem til C : \\ : en
Hver outlookItem i InboxFolder.outlookItems
Hver mailAttachment i outlookItem.Attachments
fname = "C : \\ " & mailAttachment . fname
mailAttachment.SaveAsFile fname
Neste mailAttachment
Neste outlookItem
6
Skriv inn følgende for å frigjøre dine variabler fra minnet :
Set mailAttachment = Ingenting
Sett outlookItem = Ingenting
Set namespace = Ingenting
Execute din sub å lagre Outlook e-postvedlegg til "C : \\ "