Обычно такого рода вещи пишутся на коленке. В одной табличке надо было визуализировать списки по типу материалов (их там было типов немного, с десяток, но все равно трудозатратно фильтровать и вручную закрашивать).
В результате написался макрос.
Выделяете диапазон столбца, по значениям которого надо расскразить (внимание, должен бьыть конечный список, потому что выделяя весь столбец вы получите почти миллион пустых строчек, которые программа будет обрабатывать), запускаете макрос, и вам он расскрашивает строчки случайными цветами,
Текст макроса:
Sub color_Row()
Dim x
Dim nRow As Long
Dim count As Long
Dim count1 As Long
Dim count3 As Long
ReDim short(1)
Dim mark As Integer
ReDim list(2, 1)
count = Selection.Rows.count
ReDim list(2, count)
mark = 0
count1 = 1
count3 = 1
For Each x In Selection
list(1, count1) = x.Row
list(2, count1) = x
mark = 0
For I = 1 To count3
If short(I) = x Then mark = 1
Next I
If mark = 0 Then
count3 = count3 + 1
ReDim Preserve short(count3)
short(count3) = x
End If
count1 = count1 + 1
Next
For I = 1 To count3
S = WorksheetFunction.RandBetween(0, 5043) * 13
For j = 1 To count
If list(2, j) = short(I) Then Rows(list(1, j)).Interior.Color = I * 15000 + S + 10963955
Next j
Next I
10 End Sub
Как установить макрос в Эксель видео (не мое)