VBA CODE FRAMING ACCORDING TO CONDITIONS

[Excelpromax123]

Hello everyone. I need a VBA code to underline when the product code (column B) appears 2 times or more (like the image described below). thank you

test code.xlsm

drive.google.com

 

[duggie33]

Conditional formatting will work for this...

Book1
	A	B	C
1	NO	NAME	QTY
2	1	x1	10
3	2	х2	20
4	3	x3	30
5	4	х4	40
6	4	х5	50
7	4	хб	60
8	5	х7	70
9	6	х8	80
10	6	х9	90
11	7	х10	100
12	8	х11	100
13	9	х12	3
14	10	х13	5
15	11	x14	5
16	11	х15	6
Sheet1

Cells with Conditional Formatting
Cell	Condition		Cell Format	Stop If True
A2:C16	Expression	=AND(COUNTIF($A$2:$A$16,$A2)>1,COUNTIF($A$2:$A2,$A2)=COUNTIF($A$2:$A$16,$A2))	text	NO
A2:C16	Expression	=AND(COUNTIF($A$2:$A$16,$A2)>1,COUNTIF($A$2:$A2,$A2)=1)	text	NO
A2:C16	Expression	=COUNTIF($A$2:$A$16,$A2)>1	text	NO

I prefer highlighted cells rather than the borders because you cannot always tell if it borders above or below when looking at the results. The sample data is small enough it is easy to tell, think bigger.

Hope that helps,

Doug

 

[Excelpromax123]

Conditional formatting will work for this...

Book1
	A	B	C
1	NO	NAME	QTY
2	1	x1	10
3	2	х2	20
4	3	x3	30
5	4	х4	40
6	4	х5	50
7	4	хб	60
8	5	х7	70
9	6	х8	80
10	6	х9	90
11	7	х10	100
12	8	х11	100
13	9	х12	3
14	10	х13	5
15	11	x14	5
16	11	х15	6
Sheet1

Cells with Conditional Formatting
Cell	Condition		Cell Format	Stop If True
A2:C16	Expression	=AND(COUNTIF($A$2:$A$16,$A2)>1,COUNTIF($A$2:$A2,$A2)=COUNTIF($A$2:$A$16,$A2))	text	NO
A2:C16	Expression	=AND(COUNTIF($A$2:$A$16,$A2)>1,COUNTIF($A$2:$A2,$A2)=1)	text	NO
A2:C16	Expression	=COUNTIF($A$2:$A$16,$A2)>1	text	NO

I prefer highlighted cells rather than the borders because you cannot always tell if it borders above or below when looking at the results. The sample data is small enough it is easy to tell, think bigger.

Hope that helps,

Doug

THank you

 

[duggie33]

No problem, glad to help.