Problème de mise en forme avec un bouton

[Magic_Doctor]

Bonjour, ou plutôt, bonsoir à tous

J'ai mis un bouton dans ma feuille et sur lequel il y a un texte.
En fonction des circonstances, et par le biais évidemment d'une macro, ce texte peut se modifier (soit en français, soit en espagnol, soit en anglais). Jusque là pas de problème.
Seulement, je désire que la taille de la police de la fin du texte soit de 13 (pas de problème), mais que la couleur de la police soit rouge. Et là il y a problème...
Voici la syntaxe de la macro :

With Selection.Characters(Start:=w%, Length:=3).Font
.Size = 13
.ColorIndex = 3 'là ça ne marche pas !!
End With

Un grand merci pour celui qui m'aidera à trover l'erreur.

Une très bonne fin de soirée.

 

[Micke-31]

Re : Problème de mise en forme avec un bouton

Salut,

a la place de ColorIndex = 3, mets

CommandButton1.ForeColor = &HFF1

CommandButton1 est le n° du bouton

a+

 

[Magic_Doctor]

Re : Problème de mise en forme avec un bouton

Merci pour cette tentative de résolution, mais je pense que tu n'as pas bien lu mon message.

Supposons que sur ce bouton soit écrit :
"Les chaussettes de l'Archiduchesse"

Je veux tout simplement que "Archiduchesse" soit écrit plus gros et en rouge. Et non tout en gros et en rouge !

J'ai fait l'essai suivant qui fonctionne :

With Selection.Characters(Start:=w%, Length:=3).Font
.ColorIndex = 3
.Size = 13
End With

au lieu de :

With Selection.Characters(Start:=w%, Length:=3).Font
.Size = 13
.ColorIndex = 3
End With

Et curieusement ça marche...!
Décidément Excel c'est franchement tordu !