sauter des lignes dans un message outlook cree par macro

[rainbow69006]

Bonjour

J'utilise ce code pour envoyer des mails pre ecrit.
Cela marche tres bien par contre comment je dois faire pour que cela saute des lignes dans la partie en gras?
merci


Option Explicit

Sub envoi()
Dim ApplicOutlook As Object
Dim ElémentCourrier As Object
Dim Cellule As Range
Dim Sujet As String
Dim AdresseElec As String
Dim Msg As String

'Création de l'objet Outlook
Set ApplicOutlook = CreateObject("Outlook.Application")

'Extraction des données
Sujet = "Cdes à relancer"
AdresseElec = "mag@rrr.fr"

'Composition du message
Msg = "Merci de bien vouloir me donner un délai"
Msg = Msg & " pour les références citées ci-après"
Msg = Msg & ""
Msg = Msg & "Rows.Select"

'Création de l'élément de courrier et envoi
Set ElémentCourrier = ApplicOutlook.CreateItem(0)
With ElémentCourrier
.To = AdresseElec
'.Cc = ??
.Subject = Sujet
.Body = Msg
.Display
End With

End Sub

 

[Pierrot93]

Re : sauter des lignes dans un message outlook cree par macro

Bonsoir Raimbow

essaye avec la constante "vblf", comme ci dessous :

Msg = "Merci de bien vouloir me donner un délai" & vbLf
Msg = Msg & " pour les références citées ci-après" & vbLf

bonne soirée
@+

 

[rainbow69006]

Re : sauter des lignes dans un message outlook cree par macro

S'etait bien ca!

merci beaucoup