2nd body in e-mail

Hi all just wondering how i can add a second body in an e-mail sent via excel?

Here's the code:

With MailSelection
                .to = EmailAddress
                .Subject = Subject
                .Body = "PLEASE ENTER DATE"
                .display
                    SendKeys "^{END}", True
                    SendKeys "^({v})", True
                    
                'want a second line of text here :)
                
                ThisWorkbook.Sheets("Weekly").Range("K5:R19").Copy
                    SendKeys "^{END}", True
                    SendKeys "^({v})", True
                    
            End With

thanks for reading and i hope you can help