Discussion :

[Logistiq]

Bonjour à tous,

Comment faire pour que dans le mail qui est automatisé via la macro (bouton), faire que la cellule C21 (onglet Mail), apparaisse non pas en police de caractère "calibri" mais "wingdings" ??

Merci

Excel forum.xls

[Menhir]

Déjà, ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
With ActiveCell
Cells(3, 21).Select
Cells(3, 21).Font.Name = "Wingdings"
 
End With

Peut être résumé en :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cells(3, 21).Font.Name = "Wingdings"

Le reste ne servant à rien.

Mais cette tentative ne résoudra pas ton problème puisque le message que tu envois est en pure texte et ne prend dans les cellules que leur valeur et pas du tout leur format.
Tu peux donc supprimer totalement cette partie (et en profiter pour aller regarder dans l'aide VBA Excel l'utilisation de l'instruction With).

Je ne connais pas les objets Outlook. Je ne peux donc pas te dire s'il est possible d'introduire la notion de format dans une partie du corps de texte.
Si c'est le cas, ce sera forcément dans l'objet Body.