Uma pequena macro VBA para atualizar todas as cores toda vez que uma nova célula é selecionada. Ele compara o valor da célula selecionada com todos os outros valores da célula e, se eles corresponderem, a célula comparada será destacada em amarelo.
PrivateSubWorksheet_SelectionChange(ByValrngSelAsRange)SetrngTable=[B2:E13]IfrngSel.Count>1OrIntersect(rngSel,rngTable)IsNothingThenEndForEachrngCellInrngTablerngCell.Interior.ColorIndex=IIf(rngCell.Value=rngSel.Value,27,-4142)NextEndSub
Dicas
SetrngTable=[B2:E13]
»AlteraointervalodecélulasondeascorespodemseralteradasIIf(rngCell.Value=rngSel.Value,27,-4142)
»Altereocódigo de cor se você quero outra cor para ser usada