Αντιγραφή απο excel στο body email του Outloook

[Zounds]

Καλησπέρα σε όλους ,

θα ήθέλα την βοήθεια σας
προσπαθώ να αντιγραψω κελια που αποτελούν πίνακα από αρχείο excel στο body ενος email στο outlook αλλά δεν τα έχω καταφέρει μεχρι στιγμής

παραθέτω τον κωδικα


Option Explicit

Sub sendemail()

Dim olApp As Outlook.Application
Dim olemail As Outlook.MailItem
Dim rng As Range

' opens outlook
Set olApp = New Outlook.Application

' creates a blank email
Set olemail = olApp.CreateItem(olMailItem)

'diplays the new blank email
With olemail
.BodyFormat = olFormatPlain
.Display

.Body = "a1:e5"

.To = "zounds@hotmail.com"
.Subject = "Subject"
.Attachments.Add "C:\......\cv-kv.pdf"
End With
End Sub

θα ήθελα καπως να οριζω πχ απο το excel το range
πχ
table = Range("a1", "d" & Cells(Rows.Count, "a").End(xlUp).Row)
και επειτα με καποιο τροπο να τα επικολω στο body του email Που μολις δημιουργησα.

Πως μπορώ να το κάνω αυτό ;
Αναμένω την πολύτιμη βοηθειά σας

Ευχαριστώ,