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

ravemon Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
ravemon Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -
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

2 réponses

  1.
    eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    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
  2. ravemon Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
     
    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