Saut ligne ds corps mail par macro excel
kitty06
-
kitty06 -
kitty06 -
Bonjour,
J'aurais souhaité savoir s'il était possible de faire des sauts de lignes dans le corps d'un email envoyé par macro excel avec Outlook ?
Voici le code :
Sub EnvoiUnMail()
Dim MailAd As String
Dim Msg As String
Dim Subj As String
Dim URLto As String
Dim i As Integer
Dim Qui(250) As String
Dim Mail(250) As String
Dim Tache(250) As String
For i = 1 To 246
If Range("K" & i).Value = "Retard" Then
Qui(i) = Range("D" & i).Value
Mail(i) = Range("M" & i).Value
Tache(i) = Range("A" & i).Value
MsgBox ("Il y a du RETARD dans l'execution d'une tâche." & Chr(13) & "Cette tâche concerne l'interlocuteur suivant : " & Chr(13) & Qui(i))
MailAd = "" & Mail(i)
Subj = "retard "
Msg = "Bonjour, je viens de voir qu'il y avait du retard dans l'éxecution de : " & Tache(i) Passage à la ligne "Pourriez-vous régulariser cela asez rapidement ? " Passage à la ligne "Cordialement"
URLto = "mailto:" & MailAd & "?subject=" & Subj & "&body=" & Msg
ActiveWorkbook.FollowHyperlink Address:=URLto
End If
End Sub
J'aurais souhaité savoir s'il était possible de faire des sauts de lignes dans le corps d'un email envoyé par macro excel avec Outlook ?
Voici le code :
Sub EnvoiUnMail()
Dim MailAd As String
Dim Msg As String
Dim Subj As String
Dim URLto As String
Dim i As Integer
Dim Qui(250) As String
Dim Mail(250) As String
Dim Tache(250) As String
For i = 1 To 246
If Range("K" & i).Value = "Retard" Then
Qui(i) = Range("D" & i).Value
Mail(i) = Range("M" & i).Value
Tache(i) = Range("A" & i).Value
MsgBox ("Il y a du RETARD dans l'execution d'une tâche." & Chr(13) & "Cette tâche concerne l'interlocuteur suivant : " & Chr(13) & Qui(i))
MailAd = "" & Mail(i)
Subj = "retard "
Msg = "Bonjour, je viens de voir qu'il y avait du retard dans l'éxecution de : " & Tache(i) Passage à la ligne "Pourriez-vous régulariser cela asez rapidement ? " Passage à la ligne "Cordialement"
URLto = "mailto:" & MailAd & "?subject=" & Subj & "&body=" & Msg
ActiveWorkbook.FollowHyperlink Address:=URLto
End If
End Sub
A voir également:
- Saut ligne ds corps mail par macro excel
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Excel trier par ordre croissant chiffre - Guide
- Partager photos en ligne - Guide
- Formule somme excel ligne - Guide