Modification d'une partie d'un code / attribution d'une police

ravemon Messages postés 4 Statut Membre -  
ravemon Messages postés 4 Statut Membre -
Bonjour,

actuellement j'ai ce code

00022006002007AN

et je souhaiterais arrivé à ça

0002"2006"002007AN

c'est a dire "2006" étant l'année je souhaite lui attribuer une couleur de police style rouge et gras

merci de votre aide

ray

A voir également:

2 réponses

eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 282
 
Bonjour,

Si c'est manuellement :
met-toi en édition de la formule, sélectionne tes 4 caractères et applique Gras et Rouge.

Par macro :
Sub coloreAnnée()
    Dim c As Range
    For Each c In Selection
        With c.Characters(Start:=5, Length:=4).Font
            .FontStyle = "Gras"
            .ColorIndex = 3
        End With
    Next c
End Sub
Sélectionne la plage et lance la macro. Toutes les cellules seront traitées.

eric
0
ravemon Messages postés 4 Statut Membre
 
manuellement ça c'est bon je veux l'automatiser pour 600 lignes donc je testerais ta macro demain au taf même si la je maîtrise pas du tout

merci de ton aide

je vous tiens au courant

ray
0