From the standard Outlook automation code found here:
http://support.microsoft.com/kb/161088Obviously you will have to adjust for your unique Object Names.
(I am sure you get the idea)
;-)
' Add the CC recipient(s) to the message.
Set objOutlookRecip = .Recipients.Add("Some Name")
objOutlookRecip.Type = olCC
' Resolve each Recipient's name.
For Each ObjOutlookRecip In .Recipients
objOutlookRecip.Resolve
Next
JeffCoachman