Guru do Excel e Power BI

Bom dia
Tenho uma lista com números (G5:G505) em J3 insiro o número 348 e em G5:G505 o número 348 é "pintado" de vermelho e permanece vermelho, outros números serão inseridos em J3. Não posso usar formatação condicional, preciso pintar o número dessa lista que estiver informado em J3. Hoje o trabalho é manual. Uma macro faz isso? Qual?0

Boa tarde.
Veja se serve.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim XRange As Range
If Selection.Rows.Count > 1 Or Selection.Columns.Count > 1 Then Exit Sub
If Target.Row = 3 And Target.Column = 10 And Target.Value <> "" Then
Cells(WorksheetFunction.Match(Range("J3").Value, Range("G5:G505"), 0) + 4, 7).Interior.ColorIndex = 3
End If
End Sub

Grati pela ajuda Foxtri