Bonjour à tous,
Je cherche comment aller à la ligne dans le corps de mon message.
J'utilise Thunderbird Mozilla.
J'ai essayé tout ce que j'ai pu trouver sur le net :
vbNewLine
vbCrLf
Chr(13)
Chr(13) & Chr(10)
VbLF
Rien ne marche
J'utilise un programme que m'a gentiment indiqué DoubleZero, en voici le début :
Une solution possible? Ou alors un moyen d'étrangler Excel après l'avoir longuement fait cuire à feu doux?
Merci d'avance
Je cherche comment aller à la ligne dans le corps de mon message.
J'utilise Thunderbird Mozilla.
J'ai essayé tout ce que j'ai pu trouver sur le net :
vbNewLine
vbCrLf
Chr(13)
Chr(13) & Chr(10)
VbLF
Rien ne marche
J'utilise un programme que m'a gentiment indiqué DoubleZero, en voici le début :
Code:
Option Explicit
Dim TouchesPJ(5) As String, TouchesEnvoi(5) As String
Sub EnvoiEmail(Adresse As String, Objet As String, Corps As String, Optional PJ As String, Optional Cc As String, Optional Bcc As String, Optional Collage As Boolean)
Dim HyperLien As String
Dim i As Integer
Dim Client As Integer
HyperLien = "mailto:" & Adresse & "?"
HyperLien = HyperLien & "Subject=" & Objet '& " (à " & Time() & ")"
'------Et ensuite c'est là que ça coince, j'ai essayé tous les codes, rien à faire, il ne veut pas aller à la ligne dans le message! :
HyperLien = HyperLien & "&Body=" & "Ligne1" & vbNewLine & vbCr & vbLf & Chr$(10) & Chr$(13) & Chr(10) & Chr(13) & vbCrLf & " Ligne2"
'---------------
ActiveWorkbook.FollowHyperlink HyperLienUne solution possible? Ou alors un moyen d'étrangler Excel après l'avoir longuement fait cuire à feu doux?
Merci d'avance