sous-totaux + colorindex ?

bonsoir à tout le forum

Pour un sous-total l'enregistreur de macro donne , en gros

Selection.Subtotal GroupBy:=1, Function:=xlSum, TotalList:=Array(2)

Est-il possible à votre idée d'y rajouter une colorindex=3 ou forecolor=&HFF ?
pour bien le différencié des autres nombres.
ci joint un fichier pour plus de clareté
merci d'avance
bonne soirée
Evelynetfrancois