• 
  

  hur man kan få en 2007 kvarstad VBA e-post

  
  

Visual Basic for Applications ( VBA ) är ett programspråk som ofta används i Office-program för att automatisera rutinuppgifter . Du kan enkelt skriva VBA -kod för att söka efter en specifik bilaga i din inkorg mapp och spara den i en valfri mapp
1 .
Starta Microsoft Access 2007 , välj " Databas Verktyg " fliken och klicka på " Visual Basic " . Välj menyn "Verktyg" och klicka på " Referenser " . Markera rutan bredvid " Microsoft Outlook 12. 0 Object Library " och klicka "OK".
2
Skriv följande för att skapa en ny sub .



Sub getEemailAttachment ( )



Skriv " Enter "för att skapa " End Sub " automatiskt .
3 .
Skriv följande att förklara dina variabler som kommer att användas för att komma åt din Bifogade filer i Outlook :



Dim nmSp Som Namnrymd

Dim oInbxFldr Som MAPIFolder

Dim objMailItems As Object

Dim emailAttachment Som Outlook. Attachment
4
Skriv följande för att definiera din namnområdet och definiera variabeln att hålla Inkorgen i Outlook -mappen .



Set nmSp=GetNamespace ( " MAPI " )

Set oInbxFldr=nmSp . GetDefaultFolder ( olFolderInbox )
5
Skriv följande för att loopa igenom alla dina bilagor och spara din anknytning till . "C : \ " när den hittat :



For Each objMailItems I oInbxFldr. Items

For Each emailAttachment I objMailItems. attachments

Om emailAttachment. FileName=" myAttachment. doc " Då

emailAttachment. SaveAsFile "C: \ " attachmentFileName

End If

Nästa emailAttachment

Nästa objMailItems



Du kan ersätta " myAttachment . doc " med namnet på din fil i följande rad :

Om emailAttachment. FileName=" . myAttachment. doc "
6
Skriv följande för att frigöra dina variabler från minnet :



Set emailAttachment=Inget

Set objMailItems=Inget

Set nmSp=Nothing

Previous：nothing Next：hur man skapar en Adobe AIR-applikation

Relaterade artiklar