Se connecter avec
S'enregistrer | Connectez-vous

Aide sur Macro Excel à Outlook

Dernière réponse : dans Programmation

Bonjour, j’aurais besoin d’aide. Je suis novice en la matière et j’ai de la peine à modifier ce code.

J’ai une macro pour envoyer un email depuis Excel sur Outlook

Mes questions sont les suivantes.

1) Peut-on modifier ce code pour que l’email parte sur Outlook Express et non sur Outlook. Si oui comment ?

2) J’aimerais ajouter une image en background, Est-ce possible. Si oui comment ?

3) J'aimerais pouvoir changer la police et pouvoir mettre en gras. Est-ce possible. Si comment ?

Si quelqu'un pourrais m’aider ça serais super sympa. Je vous remercie d’avance pour l’intérêt que vous porterez à ce sujet.
-----------------------------------------

Sub SendMail_Outlook()

'Avant de lancer cette macro, Dans l'éditeur VBA: Faire Menu / Tools / Reference / Cocher "Microsoft Outlook Library"

Dim ol As New Outlook.Application
Dim olmail As MailItem
Dim CurrFile As String
'la variable mytx est de(A7:G24)
For lig = 7 To 24
For col = 1 To 7
mytx = mytx & Sheets("Feuil2").Cells(lig, col) & " "

Next

mytx = mytx & vbCr

Next

Set ol = New Outlook.Application
Set olmail = ol.CreateItem(olMailItem)
With olmail
.To = [Feuil1!B3] 'en B3 l'adresse destinataire
.Subject = [Feuil1!B4] 'ici le sujet
.Body = mytx 'ici le texte de A7:G24
.Display '.Display Send
End With
End Sub



Autres pages sur : aide macro excel outlook

Lassé par la pub ? Créez un compte

voila, donc toujours avec la library d'outlook definie dans les références . ca evoie un mail sous un format html, donc le plus simple est d'ecrire son code html et de le copier dans le HTMLBody pour etre sur du code HTML..
tout comme une page html, on peu mettre du gras, de l'italique, definir la taille de police, mettre une image en arriere plan, etc, ... je pense que t'y etait pas loin, juste le bodyformat a mettre en olFormatHTML et t'etais bon ! :) 
  1. Sub test()
  2. Set a = Outlook.CreateItem(olMailItem)
  3. With a
  4. .To = "inoujk@free.fr"
  5. .Subject = "test de prog"
  6. .BodyFormat = olFormatHTML
  7. .HTMLBody = "le texte en html avec du <b>gras</b> de <i>l'italique</i> etc..."
  8. .Send
  9. End With
  10. End Sub

boujour slideroner,

j'ai le meme probleme que tu d'ecris dans ce forum...je cherche absolument à transférer le contenu obtenu par une form, dans un message outlook express et en format html, afin qu'au moins la police puisse etre modifiable...

As tu trouver reponse à tes questions???ca fait des jours que je cherche sur le net....

merci d'avance....

Benoit
Lassé par la pub ? Créez un compte