Lorsque vous travaillez avec des chaînes en VBA, utilisez vbNewLine, vbCrLf ou vbCR pour insérer un saut de ligne/un nouveau paragraphe.
Cet article explique également comment utiliser le caractère de continuation de ligne pour continuer une instruction dans votre code VBA réel sur une nouvelle ligne.
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 Exécution :
| 1234567891011 | Sous utilisantvbNewLine()Dim StringOne en tant que chaîneDim StringDeux en tant que chaîneStringOne = "Ceci est String One"StringTwo = "Ceci est la chaîne deux"Debug.Print StringOne & vbNewLine & StringTwoFin du sous-marin |
Le résultat est:
Utiliser vbCrLf
Le code suivant vous montre comment utiliser vbCrLf pour placer la deuxième chaîne de texte sur une nouvelle ligne dans une forme :
| 123456789101112131415 | Sous Utilisation de vbCrLf()Dim StringOne en tant que chaîneDim StringDeux en tant que chaîneStringOne = "Ceci est String One"StringTwo = "Ceci est la chaîne deux"ActiveSheet.Shapes.AddShape(msoShapeRectangle, 15, 15, 100, 50).SélectionnezAvec sélection.Characters.Text = StringOne & vbCrLf & StringTwoTerminer parFin du sous-marin |
Le résultat est:
Utiliser vbCR
Le code suivant vous montre comment utiliser vbCR pour placer la deuxième chaîne de texte sur une nouvelle ligne dans une boîte de message :
| 1234567891011 | Sous utilisant vbCR()Dim StringOne en tant que chaîneDim StringDeux en tant que chaîneStringOne = "Ceci est String One"StringTwo = "Ceci est la chaîne deux"MsgBox StringOne & vbCr & StringTwoFin du sous-marin |
Le résultat est:
Continuer une déclaration en VBA
Vous pouvez utiliser le caractère de continuation de ligne ("_" alias le trait de soulignement) pour continuer 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 :
| 12345 | Sub LineContinuation ()Si Plage("b1").Valeur > 0 Alors _Range("c1").Valeur = "Supérieur à zéro"Fin du sous-marin |
