Couleur de texte sur bouton de formulaire

bonjour

j'ai un soucis 'mineur' avec une macro que voici et qui consiste à placer un bouton sur une feuille accompagné des instruction suivantes:

With Workbooks("STATUS.xls").ActiveSheet.BUTTONS.Add(Range("O155:M157").Left, Range("O155:M157").Top, Range("O155:M157").Width, Range("O155:M157").Height)

       .Characters.Text = "recettes"
        .OnAction = " 'FACTURES.xls'!TEE"
        With .Characters(Start:=1, Length:=23).Font
            .Name = "Arial"
            .FontStyle = "GRAS"
            .Size = 22
            .ColorIndex = xlAutomatic  'erreur sur cette ligne
        End With
    End With

l'erreur se produit sur la ligne .ColorIndex = xlAutomatic accompagnée du message "la couleur de police doit etre entre 1 et 409"

je precise etre passé sous excel 2010 alors que ce meme code fonctionnait parfaitement sous excel 2003

Voyez vous d'ou peut venir cette anomalie ? En vous remerciant grandement pour toute suggestion , car

Bonjour Rocket

ton code tourne correctement sans erreur sur un office 365 ProPlus

Fred

Re

et pas de soucis aussi sur un office pro plus 2019...

je n'ais pas de 2010 je ne peux donc pas tester..

Fred

Merci fred2406 ca rassure deja ....mais je vois que vba est quand meme super sensible au changement

une idee..

ton office est a jour des services packs et MAJ ??

Fred

Bonne question fred2406!!! .... je vais voir va , ..Merci