Highlight cell same color as matching value vba

[katela]

Hi there!

I am trying to write a macro to reference a list of values (column A on colours tab), find the matching value on another worksheet (column A on Detail tab), resize and highlight (column A to D on detail tab) the same colour as the
original value. END RESULT tab is what I'm trying to get the macro to achieve.

 

[fahad_ibnfurjan]

Public Sub cond_Frmt()
Dim Rng As Range, Cll As Range
For Each Rng In Worksheets("END RESULT").Range("A2:A13")
 For Each Cll In Worksheets("Coloure").Range("A1:A3")
     If Rng.Value = Cll.Value Then Rng.Resize(1, 4).Interior.Color = Cll.Interior.Color
    Next
Next

End Sub

or

المصنف1
	A	B	C	D
1	Number	JE#	Date	Amount
2	1	19	01/01/2025	200
3	2	20	01/02/2025	250
4	3	21	01/03/2025	260
5	4	22	01/04/2025	270
6	5	23	01/05/2025	280
7	6	24	01/06/2025	290
8	7	25	01/07/2025	300
9	11	26	01/08/2025	10
10	11	27	01/09/2025	10
11	11	28	01/10/2025	10
12	12	29	01/11/2025	20
13	12	30	01/12/2025	20
END RESULT

Cells with Conditional Formatting
Cell	Condition		Cell Format	Stop If True
A2:D13	Expression	=MATCH($A2,Coloure!$A$2,0)	text	NO
A2:D13	Expression	=MATCH($A2,Coloure!$A$1,0)	text	NO