Je voudrai créer un VBA qui se lance lors de l'envoi de mes messages sous OUTLOOK 2007 (règle avec action personnalisée) afin de rajouter une personne en Cci automatiquement ! Outlook ne propose qu'une personne en Cc et ce n'est pas très pro !
Je n'arrive pas à faire le VBA (je ne sais que partir d'un nouvel objet mail) et je n'arrive pas configurer l'éxécution de l'action l'envoi de mes messages !
Merci d'avance tous ceux qui contribueront à la résolution de ce pb !
Bonjour,
j'avais le même problème.
Arès de multiple rechecher, j'ai trouver ce bout de code à copier dans Visual Basic et surtout dans "ThisOutlookSession"
Private Sub Application_ItemSend(ByVal Item As Object, _
Cancel As Boolean)
Dim objRecip As Recipient
Dim strMsg As String
Dim res As Integer
Dim strBcc As String
On Error Resume Next
' #### USER OPTIONS ####
' address for Bcc -- must be SMTP address or resolvable
' to a name in the address book
strBcc = "someone@somewhere.dom"
Set objRecip = Item.Recipients.Add(strBcc)
objRecip.Type = olBCC
If Not objRecip.Resolve Then
strMsg = "Could not resolve the Bcc recipient. " & _
"Do you want still to send the message?"
res = MsgBox(strMsg, vbYesNo + vbDefaultButton1, _
"Could Not Resolve Bcc Recipient")
If res = vbNo Then
Cancel = True
End If
End If
