Tout semble fonctionner, sauf l'ajout de l'adresse e-mail à la cc. Le compte avec lequel je suis en train de tester peut être caché de la liste d'adresses globale.Essayer de créer un bouton dans Outlook 2010 qui répond à l'email en surbrillance/email ouvert w/texte statique et cc une adresse e-mail
Il existe également un moyen d'ajouter le nom d'affichage de l'utilisateur au texte du corps, c'est-à-dire le grand travail (nom dynamique, c'est-à-dire Ted auquel je réponds)! J'ai aimé ton travail. . .
utilisant Windows 7 Entreprise w/perspectives 2010 32bit Professional Plus et l'échange 2010.
Merci! Code ci-dessous
Sub GoodJob()
Dim m As MailItem 'object/mail item iterator
Dim recip As Recipient 'object to represent recipient(s)
Dim reply As MailItem 'object which will represent the reply email
'Loop over each SELECTED item:
For Each m In Application.ActiveExplorer.Selection
If m.Class = olMail Then
Set reply = m.reply
'Adds a "direct replies to" address:
'Set recip = reply.ReplyRecipients.Add("[email protected]")
Set recip = reply.ReplyRecipients.Add("[email protected]")
recip.Type = olCC
'adds Subject "Great Job! I loved your work on this Project" to email
reply.Subject = "Great Job ! I loved your work on this Project"
'Adds Body of text to email
reply.Body = "Your awesomeness has been shared with Driver X" & vbLf & m.Body
reply.Save 'saves a draft copy to your SENT folder
reply.Send
End If
Next
End Sub
Qu'est-ce qui échoue exactement à propos de l'ajout de l'adresse CC? Comme pour obtenir un nom d'utilisateur dynamique, vous pouvez vouloir 'Account.Username' ou éventuellement' Environ ("userdomain") & "\" & Environ ("nom d'utilisateur") ' – Mikegrann
Il fait tout le reste sujet = 100% du code email = 100% du code. – Toofgib
Il fait tout le reste sujet = 100% du code Corps de l'email = 100% du code. Lorsque je regarde l'e-mail envoyé, il n'y a pas d'adresse e-mail dans la partie CC de l'e-mail. – Toofgib