|
Visual Basic pour Applications ( VBA) est un langage de programmation couramment utilisé dans les applications Office pour automatiser des tâches de routine. Vous pouvez facilement écrire du code VBA pour rechercher un attachement spécifique dans votre boîte de réception et l'enregistrer dans un dossier de votre choix . Instructions
1 Démarrez Microsoft Access 2007, sélectionnez l'onglet " Base de données Outils" et cliquez sur " Visual Basic " . Choisissez le menu " Outils " et cliquez sur "Références" . Cochez la case à côté de " Microsoft Outlook 12.0 Object Library" et cliquez sur " OK"
2 Tapez la suivante pour créer un nouveau sous : .
Sous getEemailAttachment ()
Tapez " Entrée" pour créer les "End Sub " automatiquement
3 Tapez la suivante pour déclarer vos variables qui seront utilisés pour accéder à vos pièces jointes Outlook : .
< p> NMSP As nameSpace
oInbxFldr As MAPIFolder
objMailItems As Object
emailAttachment As Outlook.Attachment
4 Type de l' suivantes pour définir votre espace de noms et de définir la variable pour contenir la boîte de réception Outlook dossier :
Set NMSP = GetNamespace ( " MAPI " )
Set oInbxFldr = nmSp.GetDefaultFolder ( olFolderInbox )
5 Tapez la commande suivante pour parcourir toutes vos pièces jointes et enregistrer votre attachement à " C: \\" quand il se trouve :
For Each objMailItems en oInbxFldr.Items
For Each emailAttachment En objMailItems.attachments
Si emailAttachment.FileName = " myAttachment.doc " Alors
emailAttachment.SaveAsFile "C: \\" & attachmentFileName
End If
Suivant emailAttachment
suivante objMailItems
Vous pouvez remplacer " myAttachment.doc " avec le nom de votre attachement à la ligne suivante:
Si emailAttachment.FileName = " myAttachment . doc "
6 Tapez la commande suivante pour libérer vos variables de la mémoire :
Set emailAttachment = Nothing Set
objMailItems = Nothing Set
NMSP = Nothing
|
