Send Email to multiple .CC in outlook, from Excel userform

[tripodgod]

Hello again,

I have almost finished the project i am working on, but am stuck in trying to get 2 people in the CC column of the generated email. I have created an order number system, that has variable email addresses in TextBox11 and TextBox12. Here is my code:

Private Sub CommandButton4_Click()
Dim oOLook As Object
Dim oEMail As Object

Set oOLook = CreateObject("Outlook.Application")
oOLook.Session.Logon
Set oEMail = oOLook.CreateItem(0)
oEMail.Display

 On Error Resume Next
With oEMail
 .To = TextBox7.Text
 .CC = TextBox11.Text & TextBox12.Text
 .BCC = TextBox9.Text
 .Subject = "Order Number"
 .Body = "Good morning / afternoon"

 End With
 On Error GoTo 0

End Sub

This does what i want, except the 2 email addresses have no ";"... For example: joe@thismail.comjim@thismail.com.

I am sure it is a very simple thing i am missing here, but i haven't done much coding before.

Any help is appreciated!

Thank you

 

[xenou]

You should only need to add the semi-colon, as you suspected:

.CC = TextBox11.Text [B]& ";" & [/B]TextBox12.Text

 

[tripodgod]

You should only need to add the semi-colon, as you suspected:

.CC = TextBox11.Text [B]& ";" & [/B]TextBox12.Text

Perfect! Thank you very much.