Attribution d'une couleur à une variable dans VBA

Bonjour,

Voici un exemple simplifié d'une partie de mon code

Private Sub CommandButton1_Click()

Dim a As String

Dim b As String

Dim achat As String

Dim prix As String

a = "achat"

b = "prix"

a.Font.ColorIndex = 2

b.Font.ColorIndex = 6

Range("B5") = a & b

End Sub

Dans ces lignes ce sont les attributions de couleurs qui ne marchent pas et je ne trouve pas de moyen de le faire.

Je voudrais donc avoir dans la cellule :achat en bleu et prix d'une autre couleur

Impossible pour moi de mettre un indice de position et de longueur car a et b prennent des valeurs différentes.

En gros il faut que j'arrive à attribuer une couleur à a et une autre à b pour qu'à l'écriture dans la cellule ils soient de cette couleur.

Au passage si au lieu de la couleur de la police on fait un surlignage ça irait tout aussi bien pour moi.

Merci d'avance de votre attention, si quelqu'un a une idée je serais preneur.

Excel 2007

windows 7

Bonjour, bonjour !

Activer le Générateur de macros puis modifier la couleur d'une cellule : le code est livré sur un plateau ‼

Consulter l'aide VBA intégrée des propriétés Range, Cells …