Microsoft 365 envoie de mail ( presque résolu )

bonjour a tous
j'ai trouver et adapté légèrement ce code qui fonctionne très bien
j'ai juste un problème avec le corps du texte
je voudrais que la corps du texte soit la plage de cellules de C4 à F35
si quelqu'un à le courage de s'y coller
pougnarette






Sub macro3()

Dim LEMAIL As Variant
Set LEMAIL = CreateObject("outlook.Application") 'création d'un objet outlook
With LEMAIL.createitem(olmailitem)
.Subject = Range("c4") & ("le") & Range("d4")
.to = Range("j4")
.Body = de la cellule c4 à la cellule f35

.display
End With

End Sub