I have the code to send directly an e-mail with the attached EXCEL document
(see below). However, I want to create the e-mail and allow the sender to
add additional info in the e-mail before sending it. Is there code for this?

Private Sub CmdSubmit_Click()
WhereTo = Range("K2")
SubjectText = "Example for " & Range("C3") & " - " & Range("C4")
ActiveWorkbook.SendMail Recipients:=WhereTo, Subject:=SubjectText

End Sub