Строка текста слишком длинная в VBA

Я пытаюсь написать макрос для отправки готового ответа. У меня проблема в том, что тело текста слишком длинное, чтобы поместиться в одной строке моего кода. Я понятия не имею, как получить второй абзац основного текста. Я также пытаюсь оставить свое имя внизу ответа - стиль подписи. Я получаю сообщение об ошибке при попытке запуска макроса о том, что строка слишком длинная. Может кто-нибудь, пожалуйста, помогите мне? Это то, что у меня так далеко.

Sub EmailReply()
Dim Reply As Outlook.MailItem
Dim Original As Outlook.MailItem
Set Original = Application.ActiveExplorer.Selection(1)
Set Reply = Original.Reply

Reply.Subject = "In reference to your inquiry."

Reply.Body = "Dear Client," & vbNewLine & vbNewLine & "     We thank you for consulting our firm regarding your legal issue. Unfortunately, upon a review of the information provided we are unable to assist you at this time. We encourage you to seek another legal option as there may be a strict statue of limitation that may extinguish your legal rights in your manner." & vbNewLine & "     Although you did not retain us in this matter, we encourage you to contact us in the future for any legal needs or questions that you may have. Of course, there is no charge for consultation."

Reply.Display

End Sub

Попробуйте использовать vbNewLineи _вот так:

Reply.Body = "Dear Person"  & vbNewLine & vbNewLine & _
"Line1" & vbNewLine & _
"Line2" & vbNewLine & _
"Line3" & vbNewLine & vbNewLine & _
"Sincerely," & vbNewLine & _
"Me"

vbNewLine представляет символ новой строки

_ говорит VBA, что текущее утверждение не закончено.

Я вообще не использовал VBA в Ms Outlook или большей части VBA, но если есть ограничение длины строки, вы можете определить отдельные переменные и объединить их

например, a = "asdf" b = "qwert" c = a & vbNewLine & b

Итак, вы знаете, как объединять строки, как у вас уже есть, но вы также можете просто использовать отдельные переменные

Вы хотите, чтобы текст появлялся в электронном письме в виде нескольких абзацев или просто появлялся в коде в виде отдельных строк?

Для первых:

eply.Body = "Dear Client," & vbNewLine & vbNewLine & "     We thank you for consulting our firm regarding your legal issue." & vbNewLine & vbNewLine & " Unfortunately, ..."

Другими словами, вам нужно 2 vbNewLines вместе при вводе только текста (а не электронной почты в формате HTML).

В последнем случае:

"........"  & _
"... more text ..."

и так далее.