Adding TextBox2 into subject error

[Patriot2879]

Hi Good morning, please can you help me i have a macro to send an email and for the subject i want to add the text in the textbox2 into the subject heading i have done this in the code below but get an error please can you help?

 With NewMail
        .Subject = "Late Outage request - " & ThisWorkbook.Sheets("Sheet1").Range & "Sheet1.TextBox2.Value & """

 

[James006]

And what about..

Sub TestMsgBox()  
    MsgBox Sheet1.OLEObjects("TextBox2").Object.Text
End Sub