Nachdem das Wissen , wie man E-Mail- Anhänge speichern mit Visual Basic für Applikationen (VBA) können Sie Zeit sparen beim Arbeiten mit Anhängen. Sie können VBA in einem der Microsoft Office-Anwendungen , um Prozesse wie das Speichern von E-Mail- Anhänge von Outlook automatisieren verwenden . In wenigen Schritten können Sie VBA-Code schreiben , um E-Mail- Anhänge in einem bestimmten Ordner auf Ihrem Computer speichern. Anleitung
1
Starten Sie Microsoft Access 2007 , wählen Sie " Database Tools " und klicken Sie auf " Visual Basic ". Klicken Sie auf das Menü "Extras" und wählen Sie " Referenzen . " Aktivieren Sie das Kontrollkästchen neben " Microsoft Outlook 12.0 Object Library" und wählen
2
Geben Sie den folgenden , um ein Untermenü zu erstellen " OK. ":
Sub getOutlookAttachments ()
< p> "Enter" drücken
3
Geben Sie den folgenden Ihre Variablen zu erstellen :
Dim Namensraum wie nameSpace
Dim InboxFolder Wie MAPIFolder
Dim OutlookItem As Object Dim
MailAttachment Wie Outlook.Attachment
Dim fName As String
4
Geben Sie den folgenden Ihre Variablen definieren :
Set nameSpace = GetNamespace ( " MAPI " ) Set
InboxFolder = nameSpace.GetDefaultFolder ( olFolderInboxFolder )
5
Geben Sie den folgenden zu durchlaufen Ihres Posteingangs , Suche für Anbaugeräte und speichern Sie sie auf C: \\ :
For Each OutlookItem In InboxFolder.outlookItems
For Each MailAttachment In outlookItem.Attachments
fName = " C: \\" & MailAttachment . fName
mailAttachment.SaveAsFile fName
Weiter MailAttachment
Weiter OutlookItem
6
Geben Sie den folgenden , um Ihren Variablen aus dem Speicher freizugeben :
Set MailAttachment = Nothing Set
OutlookItem = Nothing Set
nameSpace = Nothing
Ihre Sub Ausführen, um Ihre Outlook- E-Mail- Anhänge auf "C: \\ " retten