VBA Nova Linha / Retorno de Carro

Ao trabalhar com sequências de caracteres no VBA, use vbNewLine, vbCrLf ou vbCR para inserir uma quebra de linha/novo parágrafo.

Este artigo também discutirá como usar o caractere de continuação de linha para continuar uma instrução em seu código VBA atual em uma nova linha.

Uso de vbNewLine

O código a seguir mostra como usar vbNewLine para colocar a segunda sequência de texto em uma nova linha na janela “Verificação Imediata”:

Sub UsandovbNewLine()

Dim StringOne As String
Dim StringTwo As String

StringOne = "Esta é a String Um"
StringTwo = "Esta é a String Dois"

Debug.Print StringOne & vbNewLine & StringTwo

End Sub

O resultado é:

Usando vbCrLf

O código a seguir mostra como você usaria vbCrLf para colocar a segunda sequência de texto em uma nova linha em uma forma:

Sub UsandovbCrLf()

Dim StringOne As String
Dim StringTwo As String

StringOne = "Esta é a String Um"
StringTwo = "Esta é a String Dois"

ActiveSheet.Shapes.AddShape(msoShapeRectangle, 15, 15, 100, 50).Select

With Selection
.Characters.Text = StringOne & vbCrLf & StringTwo
End With

End Sub

O resultado é:

Uso do vbCR

O código a seguir mostra como você usaria o vbCR para colocar a segunda sequência de texto em uma nova linha em uma caixa de mensagem:

Sub UsandovbCR()

Dim StringOne As String
Dim StringTwo As String
StringOne = "Esta é a String Um"
StringTwo = "Esta é a String Dois"

MsgBox StringOne & vbCr & StringTwo

End Sub

O resultado é:

Continuação de uma Instrução no VBA

É possível usar o caractere de continuação de linha (“_”, também conhecido como sublinhado) para continuar uma instrução de uma linha para a seguinte no código VBA. O código a seguir mostra como usar o caractere de continuação de linha:

Sub ContinuacaoLinha ()

If Range("b1").Value > 0 Then _
   Range("c1").Value = "Maior que Zero"
End Sub