Discussion :

[neomorpheus35]

Bonjour
j'ai un fichier avec plusieurs produit différent mais avec des caractéristique identique.
J'ai donc fait un code (grâce a votre aide)
Afin de mettre en couleur les case des ligne identique de différente couleur.
Maintenant je voudrais ajouté un chiffre de 1 à ... en plus des couleurs.
Je m'explique les 1ere série identique la couleur plus 1 la 2éme l'autre couleurs + 2 etc.

Voir le fichier joint pour vous aidé.
Merci

[a_diard]

si tu souhaite mettre un numéro dans la case colorée pour chaque couleur

tu pourrai ajouter nocoul dans la cellule.

Code :

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

1
2
3
4
    If mondico.Item(clé) > 1 Then
    c.Offset(, 13).Interior.ColorIndex = couleurs(nocoul)
   c.Offset(, 13).Value = nocoul
  End If

ce n'est peut être pas ton besoin ????


Bonne journée.

[neomorpheus35]

Alors la génial
Sa marche trop bien merci beaucoup a_diard