Visual Basic for Applications ( VBA ) er et programmeringssprog, der almindeligvis anvendes i Office-programmer til at automatisere rutineopgaver. Du kan nemt skrive VBA-kode for at søge efter en bestemt vedhæftet fil i din indbakke mappe og gemme det i en mappe efter eget valg . Instruktioner
1

Start Microsoft Access 2007 , skal du vælge " Database Tools " fanen og klik på " Visual Basic " . Vælg menuen "Funktioner" og klik på "Referencer" . Afkryds feltet ved siden af ​​" Microsoft Outlook 12,0 Object Library" og klik på " OK"
2

Skriv følgende for at oprette en ny sub: .

Sub getEemailAttachment ()

Type " Enter" for at skabe den " End Sub " automatisk
3

Skriv følgende at erklære dine variabler , som vil blive brugt til at få adgang til dine Outlook vedhæftede filer : .
< p> Dim nmSp Som namespace

Dim oInbxFldr Som MAPIFolder

Dim objMailItems som objekt

Dim emailAttachment Som Outlook.Attachment
4

Indtast efter at definere din namespace og definere variablen til at holde Outlook indbakke mappe : Hej

Set nmSp = GetNamespace ( " MAPI " )

Set oInbxFldr = nmSp.GetDefaultFolder ( olFolderInbox )
< br > 5

Skriv følgende at sløjfe gennem alle dine vedhæftede filer og gemme din tilknytning til "C: \\ ", når det er fundet : Hej

for hver objMailItems In oInbxFldr.Items

for hver emailAttachment I objMailItems.attachments
p Hvis emailAttachment.FileName = " myAttachment.doc " Så

emailAttachment.SaveAsFile "C: \\ " & attachmentFileName

End If
< p > Next emailAttachment

Næste objMailItems

Du kan erstatte " myAttachment.doc " med navnet på den vedhæftede fil i den følgende linje : Hej p Hvis emailAttachment.FileName = " myAttachment . doc "
6

Skriv følgende for at frigøre dine variabler fra hukommelsen : Hej

Set emailAttachment = Nothing

Set objMailItems = Nothing

Set nmSp = Nothing