Macro to send email to include CC Recipients

[howard]

I have a macro to email a sheet. The recipients are on sheet "Summary" In col Z1:Z3 and the email addresses in AA1:AA3


I am struggling to get the email to display the email address in outlook for the recipient to be CC'd

 With OutMail
            .To = Join(Application.Transpose(Range("AA1:AA3").Value), ";")

            .CC = Join(Application.Range("AA4:AA4").Value)

The .to extract the recipients perfectly. it is only the .CC where the email address is not being extracted on the outlook under C


It would be appreciated if someone could kindly assist me

 

[Jon von der Heyden]

Hi Howard
Isn't it just:

 With OutMail
            .To = Join(Application.Transpose(Range("AA1:AA3").Value), ";")


            .CC = Range("AA4").Value

 

[howard]

Thanks for the help