Att ha kunskap om hur man kan spara e- postbilagor med Visual Basic for Applications (VBA) kan du spara tid när du arbetar med bilagor . Du kan använda VBA i något av Microsoft Office-program för att automatisera processer som sparar e-postbilagor från Outlook . I några få steg kan du skriva VBA- kod för att spara e- postbilagor i någon särskild mapp i din dator
1
Starta Microsoft Access 2007 , välj " Databas Verktyg "och klicka på " Visual Basic . "Klicka på menyn "Verktyg" och välj " Referenser ". Markera rutan bredvid " Microsoft Outlook 12. 0 Object Library " och välj " OK ".
2 .
Skriv följande för att skapa en sub :
Sub getOutlookAttachments ( )
Tryck på " Enter "
3 .
Skriv följande för att skapa dina variabler :
Dim namnområde som Namnrymd
Dim InboxFolder Som MAPIFolder
Dim outlookItem As Object
Dim mailAttachment Som Outlook. Attachment
Dim fname As String
4 .
Skriv följande för att definiera dina variabler :
Set Namnrymd=GetNamespace ( " MAPI " )
Set InboxFolder=nameSpace. GetDefaultFolder ( olFolderInboxFolder )
5
Skriv följande för att loopa igenom din inkorg mappen söker redskap och spara dem i C : . \ :
For Each outlookItem I InboxFolder. outlookItems
For Each mailAttachment I outlookItem. Attachments
fnamn=" C : \ " mailAttachment. fName
mailAttachment . SaveAsFile fname
Nästa mailAttachment
Nästa outlookItem
6
Skriv följande för att frigöra dina variabler från minnet .
Set mailAttachment=Inget
Set outlookItem=Inget
Set Namnrymd=Inget
köra din sub för att spara dina Outlook e-postbilagor till "C: \ "
Previous:nothing Next:Fast jämfört med dynamisk array i Visual Basic