2017-05-25 9 views
-1

重複したグループによって色分けされた行をどのように強調表示できますか?重複したグループによって異なる色の行を強調表示するにはどうすればよいですか?

私はどの色が使われているか気にせず、重複する行を1色にし、次のセットを別の色にするだけです。例えば

enter image description here

、私は '1S' 緑のを望んでいた場合は、 '2S'、青のように。それは私のコラムでは120に上がります。

ありがとうございます。

+1

あなたはその次と1個からインクリメントするVBAが必要になります別の色を取得します。条件付き書式設定では、各色ごとに異なる規則を設定する必要があります。単純に1つの色と色を切り替えるので、複製がすべて同じになるようにしたいのであれば、ここの私の答えを見てください:https://stackoverflow.com/questions/44169577/compare-ells-a3-and-a2-if-equal-何もない他の色の行の3セルのf-rep/44169687#44169687 –

+0

https://stackoverflow.com/questions/10455366/how-to-highlight-a-cell-using-the-セル内の16進数の色の値/ 11466034#11466034が重要です。 – pnuts

答えて

1

この簡単なコードを試して、必要に応じて変更してください。そのかなり自明、

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 

enter image description here

関連する問題