Comment mettre en évidence des lignes avec des couleurs différentes par groupes de doublons?

-1

Comment mettre en évidence des lignes avec des couleurs différentes par groupes de doublons? Je ne me soucie pas des couleurs qui sont utilisées en soi, je veux juste les doublons une couleur, et le prochain ensemble de dupliquer une autre couleur.Comment mettre en évidence des lignes avec des couleurs différentes par groupes de doublons?

Par exemple, si je voulais les '1s' vert, le bleu '2s' et ainsi de suite. Cela va jusqu'à 120 dans ma colonne.

Merci.

Source

2017-05-25 JM1

pour obtenir différentes couleurs, vous aurez besoin vba incrémenter d'un à l'autre et ainsi de suite. Avec le formatage conditionnel, vous devrez avoir une règle différente pour chaque couleur. Si vous voulez simplement basculer entre une couleur et aucune couleur, les doublons sont tous les mêmes, voir ma réponse ici: https://stackoverflow.com/questions/44169577/compare-ells-a3-and-a2-if-equal- rien-autre-couleur-rangée-3-cellules-a-si-f-rep/44169687 # 44169687 –

https://stackoverflow.com/questions/10455366/how-to-highlight-a-cell-using-the- hex-color-value-within-the-cell/11466034 # 11466034 peut être utile. – pnuts

Essayez ce code simple et modifiez-le selon vos besoins. Son tout à fait explicite,

Sub dupColors() 
Dim i As Long, cIndex As Long 
cIndex = 3 
Cells(1, 1).Interior.ColorIndex = cIndex 
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row 
    If Cells(i, 1) = Cells(i + 1, 1) Then 
     Cells(i + 1, 1).Interior.ColorIndex = cIndex 
    Else 
     If Cells(i + 1, 1) <> "" Then 
      cIndex = cIndex + 1 
      Cells(i + 1, 1).Interior.ColorIndex = cIndex 
     End If 
    End If 
Next i 
End Sub

Source

2017-05-28 18:31:30

Comment mettre en évidence des lignes avec des couleurs différentes par groupes de doublons?

Répondre

Questions connexes