Bonjour,
Je suis en recherche d'une macro qui fasse la mise en forme de mon message :
- Sélectionner tout le texte
- Format du texte - Paragraphe - Espacement avant = 0 - Espacement après = 0
Voilà...
Il y a une discussion précédente qui existe sur le sujet mais la réponse donnée ne fonctionne pas chez moi.
La solution était :
Ca ne plante pas mais ca ne change rien au format de mon message.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Set OITEM = ActiveInspector.CurrentItem 'désigne l'élément actif càd le mail OITEM.HTMLBody = Replace(Replace(OITEM.HTMLBody, "mso-margin-top-alt:auto", "margin-top:0.0pt"), "mso-margin-bottom-alt:auto", "margin-bottom:0.0pt")
Je suis bien en HTML, mes macros sont actives (j'ai essayé une autre macro basique trouvée sur le forum et qui a fonctionné)
Auriez vous une solution à me proposer ?
Merci d'avance
Partager