VBA Nouvelle Ligne / Retour Chariot

Lorsque vous travaillez avec des chaînes de caractères en VBA, utilisez vbNewLine, vbCrLf ou vbCR pour insérer un saut de ligne / nouveau paragraphe.

Cet article explique également comment utiliser le caractère de continuation de ligne afin de poursuivre une déclaration sur une nouvelle ligne dans votre code VBA.

Utilisation de vbNewLine

Le code suivant vous montre comment utiliser vbNewLine pour placer la deuxième chaîne de texte sur une nouvelle ligne dans la fenêtre d’exécution:

Sub Utilisation_vbNewLine() 

Dim ChaineUn As String
Dim ChaineDeux As String

ChaineUn = "C'est la première chaîne de texte"
ChaineDeux = "C'est la deuxième chaîne de texte"

Debug.Print ChaineUn & vbNewLine & ChaineDeux

End Sub

Le résultat est :

Utilisation de vbCrLf

Le code suivant vous montre comment utiliser vbCrLf afin de placer la deuxième chaîne de texte sur une nouvelle ligne dans une forme :

Sub Utilisation_vbCrLf()

Dim ChaineUn As String
Dim ChaineDeux As String

ChaineUn = "C'est la première chaîne de caractères"
ChaineDeux = "C'est la deuxième chaîne de caractères"

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

With Selection
    .Characters.Text = ChaineUn & vbCrLf & ChaineDeux
End With

End Sub

Le résultat est :

Utilisation de vbCR

Le code suivant vous montre comment utiliser vbCR afin de placer la deuxième chaîne de texte sur une nouvelle ligne dans une boîte de message:

Sub Utilisation_vbCR()

Dim ChaineUn As String
Dim ChaineDeux As String

ChaineUn = "C'est la première chaîne de caractères"
ChaineDeux = "C'est la deuxième chaîne de caractères"

MsgBox ChaineUn & vbCr & ChaineDeux

End Sub

Le résultat est :

Poursuite d’une Instruction en VBA

Vous pouvez utiliser le caractère de continuation de ligne (« _ » alias le trait de soulignement) pour poursuivre une instruction d’une ligne à l’autre dans votre code VBA. Le code suivant vous montre comment utiliser le caractère de continuation de ligne :

Sub ContinuationDeLigne()

If Range("b1").Value > 0 Then _
   Range("c1").Value = "Plus Grand que Zéro"
End Sub

VBA Coding Made Easy

Stop searching for VBA code online. Learn more about AutoMacro - A VBA Code Builder that allows beginners to code procedures from scratch with minimal coding knowledge and with many time-saving features for all users!


Learn More!