Insertion d'une plage de Cellule excel dans un email

Version imprimable

Bonjour,

Je vous contacte car je bute sur un problème.
J'ai réalisé une macro qui permet d'envoyer un email en appuyant sur un bouton.
En dessous de ma phrase d'introduction, "Bonjour..." je souhaiterais une ligne d'espace, et la plage de cellule A23:H30.

Voici le code.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Sub Mail_workbook_Outlook_1()
'Working in 2000-2007
'This example send the last saved version of the Activeworkbook
    Dim OutApp As Object
    Dim OutMail As Object
 
    Set OutApp = CreateObject("Outlook.Application")
    OutApp.Session.Logon
    Set OutMail = OutApp.CreateItem(0)
 
    On Error Resume Next
    With OutMail
        .To = ActiveSheet.Range("C9").Value & ";" & _
ActiveSheet.Range("C10").Value & ";" & _
ActiveSheet.Range("C11").Value & ";" & _
ActiveSheet.Range("C12").Value & ";" & _
ActiveSheet.Range("C13").Value & ";" & _
ActiveSheet.Range("C14").Value & ";" & _
ActiveSheet.Range("C15").Value & ";"
 
        .CC = ""
        .BCC = ""
        .Subject = "Suivi des dossiers Groupe"
        .HTMLBody = "Bonjour, merci de bien vouloir prendre en compte les informations ci-dessous. Ceci est une relance automatique, veuillez nous excuser si cela croise votre réponse."
        .Display   'or use .Send
    End With
    On Error GoTo 0
 
    Set OutMail = Nothing
    Set OutApp = Nothing
End Sub

Merci d'avance pour votre aide

23/12/2009, 16h57
Fvandermeulen

Salut Johnfluo,

Ci dessous le lien vers une discussion à laquelle j'ai participé, regarde les deux dernières réponses, je pense qu'elle peuvent t'inspirer ;)

http://www.developpez.net/forums/d83...-tableau-mail/

Joyeux Noël
23/12/2009, 18h15
johnfluo

Merci Fvandermeulen de ta réponse.
J'ai regardé ton lien et j'ai trouvé ca très compliqué :oops: pas adapté à mon probleme. je suis bien novice en VBA il faut dire aussi.
Je comprends que & "<br>" créé une ligne d'espace.
Voici la ligne de code :
.HTMLBody = "Bonjour, Merci de bien vouloir prendre en compte les informations ci-dessous. Ceci est une relance automatique, veuillez nous excuser si cela croise votre réponse."
Où mettre l'expression & "<br>" &_ de facon à avoir un espace entre "Bonjour" et "Merci".
Et un autre espace entre "ci dessous" et "Ceci".
et finir par une dernière ligne d'espace.
au bout de laquelle je mettrai mon tableau.

Pour ce qui concerne le tableau.
le passage création /destruction htm est trop compliké pour moi.
n'est-il pas juste possible de coller à la suite la plage de cellule ?

Merci encore pour votre aide