Qual é a melhor maneira de converter um intervalo de células em uma string? Eu tenho uma função que usa apenas uma string como entrada, portanto, preciso converter o intervalo em uma string, mantendo o máximo possível da formatação (ou seja, ela precisa se parecer com uma tabela ou lista, não apenas uma sequência de caracteres) . Eu tentei trabalhar com CStr (), além de converter de um intervalo para um array e depois para uma string, mas apenas obtive erros.

Editar: tentativa de código

Dim email_answer As Integer
email_answer = MsgBox("Do you want to be emailled a copy of this schedule?", vbYesNo)
If email_answer = vbYes Then

    Dim wb As Workbook
    Dim to_send As Range
    to_send = Range("D3", "D10")

    If Val(Application.Version) < 14 Then Exit Sub

    Set wb = ActiveWorkbook
    With wb
        MailFromMacWithMail body content:=CStr(to_send), _
                    mailsubject:="Schedule", _
                    toaddress:="email address", _
                    ccaddress:="", _
                    bccaddress:="", _
                    attachment:=.FullName, _
                    displaymail:=False
    End With
    Set wb = Nothing
End If