Macro to Send Email with text in body

The code below works pretty well at bringing up an email, or even sending. Does anyone know how to write in the body of the email? I
previously had some code that would paste inside the email, but it would overwrite the autosignature which was annoying. At the moment I just want to have the same few sentences put in the body, but I want to keep the signature at the bottom.

Sub Send_Email()

'------------ Send email


    
    Set OutApp = CreateObject("Outlook.Application")
    Set OutMail = OutApp.CreateItem(0)
 
    On Error Resume Next
    With OutMail
        .To = .""
        .CC = ""
       
        .Subject = ""
       

        .Display
        '.Send
    End With
    On Error GoTo 0
 
    With Application
        .EnableEvents = True
        .ScreenUpdating = True
    End With
    
    Set OutMail = Nothing
    Set OutApp = Nothing




End Sub