VBA to CC Email Address?

[artfulldodger]

Hi Guys.

We are trying to attach a file to an email and CC it to a certain E-mail but are having no look.

we have got :

Sub SendActiveWorkbook()
Application.ScreenUpdating = False
Sheets("Sheet Name").Visible = True
Sheets("Sheet Name").Activate
Sheets("Sheet Name").Activate
Sheets("Sheet Name").Select
sendingemail = True
Call showquotestab
Sheets("Sheet Name").Select
sendingemail = False
Sheets("Sheet Name").Visible = False
Sheets("Sheet Name").Visible = False
Sheets("Sheet Name").Visible = False
Sheets("Sheet Name").Visible = False
Application.Dialogs(xlDialogSendMail).Show

the above attaches it to and email but we cant find the code to enter a CC address

 

[Stoneboysteve]

Are you using Excel and Outlook?

Steve