sauter des lignes dans un message outlook cree par macro

rainbow69006

XLDnaute Occasionnel
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

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

Bonsoir Raimbow

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

Code:
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
@+
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas