Discussion :

[DeaD78]

Bonjour à toutes et à tous.

J'aurais besoin d'une piste pour mettre une "partie" de cellule en couleur.
La valeur de certaines de mes cellules est de la forme : xxx - (yyy) où xxx est une chaîne de caractères de longueur variable yyy une autre chaîne de caractère de longueur variable. En gros, je voudrais mettre (yyy) en rouge et gras afin d'obtenir quelque chose de la forme : xxx - (yyy).

Si vous avez une petite idée, je suis preneur Je pensais à repérer le caractère "(" dans la valeur de ma cellule et de commencer à colorier avant celui-ci. Cependant, on colorie une "selection". J'ai pas trop idée de la syntaxe donc

Merci à vous tous. Et bon Week-End !

[tirex28]

Bonjour,

Tu peux adapter ce genre de code:

Code :

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

1
2
3
4
5
6
Dim d As Long, f As Long
With ActiveCell
    f = Len(.Value)
    d = InStr(1, .Value, "(")
    .Characters(d, f - d + 1).Font.Color = vbRed
End With

Cordialement,

Tirex28/

[DeaD78]

Merci beaucoup, ça marche