A linha de texto é muito longa no VBA

Question

Estou tentando gravar uma macro para enviar uma resposta automática. O problema que estou tendo é que o corpo do texto é muito longo para caber em uma linha no meu código. Não tenho ideia de como ter um segundo parágrafo do corpo do texto. Eu também estou tentando deixar meu nome na parte inferior da resposta - estilo de assinatura. Estou recebendo um erro ao tentar executar a macro informando que a linha é muito longa. Alguém por favor pode me ajudar? Isso é o que eu tenho até agora.

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

    

Answer 1

Eu não usei o VBA no Ms Outlook ou muito do VBA, mas se houver um limite de tamanho de linha, você pode definir variáveis separadas e concatená-las

por exemplo. a="asdf" b="qwert" c = a & vbNewLine & b

Assim, você sabe como concatenar strings, como você já tem, mas também pode usar variáveis separadas

    

Answer 2

Tente usar vbNewLine e _ da seguinte forma:

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

vbNewLine representa um caractere de nova linha

_ informa ao VBA que a instrução atual não está finalizada.

    

Answer 3

Você quer que o texto apareça no e-mail como vários parágrafos ou simplesmente apareça no código como linhas separadas?

Para o primeiro:

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

Em outras palavras, você precisa de 2 vbNewLines juntas ao digitar apenas o texto (em vez de um e-mail formatado em HTML).

No último caso:

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

e assim por diante.