script outlook

Question

bonjour, Outlook en 64 b - je recherche à créer des scripts avec une imprimante définie dedans pour créer des règles dans les message afin d'imprimer en fonction de l’expéditeur et/ou de l'objet.

Celui que j'utilise en ce moment est :

#If VBA7 Then
Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
#Else
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
#End If

Sub ShellImprime(fichier As String)
ShellExecute 0, "print", fichier, "", "C:\tempmail", 0
End Sub

Sub script(MyMail As MailItem)
Set fichier = MyMail.Attachments
Repertoire = "C:\tempmail"
For Each oFichier In fichier
oFichier.SaveAsFile Repertoire & oFichier.FileName
ShellImprime (oFichier.FileName)
Next
End Sub

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)

End Sub

infos

windows serveur 2016 standar

en 64bites

Answer 1

Bonjour,Merci d’avoir écrit dans le forum de Microsoft.Je voudrais mentionner que c'est un forum d'échange d'expérience entre les utilisateurs et on ne peut pas nécessairement vous offrir des scripts."Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? La liste suivante fournit des conseils sur les façons dont vous pouvez recevoir du support et fournir des commentaires. :

Questions de programmation VBA

Publiez des questions de programmation VBA sur Stack Overflow vba à l’aide de la balise, ainsi que d’autres balises pertinentes. <br> <br>Veuillez noter que Stack Overflow a des instructions telles que l’obligation d’un titre descriptif, une déclaration complète et concise du problème et des détails suffisants pour reproduire votre problème. Les demandes de fonctionnalités ou les questions trop larges sont considérées comme hors sujet. Si vous êtes un nouvel utilisateur, visitez le Centre d’aide stack overflow pour plus d’informations.

"

Pour plus d'information veuillez visiter l'article suivant : 

Office prise en charge et commentaires VBA | Microsoft Learn

Cordialement,

Mihail  Microsoft Engineer