Sử dụng Conditional formatting hoặc code để tô màu xen kẽ

[destinythanhphuong]

Hi các anh chị
có cách nào conditional formatting như trong file em đính kèm được ko?
Định dạng theo mã hàng giống nhau thì gộp chung lại một màu xám hay trắng đan xen nhau để dễ nhìn
Nếu có thể dùng công thức thì càng tốt, như vậy em có thể áp dụng ở nhiều file khác nhau.
Còn macro cũng được
thanks các anh chị

 

[nhapmon]

bạn có vẻ tiết kiệm lời nói?????
các dòng màu đen khác với các dòng màu trắng chổ nào?

 

[destinythanhphuong]

bạn có vẻ tiết kiệm lời nói?????
các dòng màu đen khác với các dòng màu trắng chổ nào?

Ý của mình là định dạng với điều kiện Mã hàng giống nhau thì cùng màu nhưng xen kẽ, gộp chung với nhau để dễ nhìn
Thanks bạn đã quan tâm

 

[Ba Tê]

Ý của mình là định dạng với điều kiện Mã hàng giống nhau thì cùng màu nhưng xen kẽ, gộp chung với nhau để dễ nhìn
Thanks bạn đã quan tâm

Bạn thử dùng cột phụ Q
- Q3=IF(B3<>B2;MAX($Q$2:Q2)+1;Q2)
- Chọn vùng có dữ liệu từ A3:Q???, Conditional Formatting, công thức =Mod($Q3;2)=1, chọn màu nền bạn muốn - OK

 

[nghiaphuc]

Ý của mình là định dạng với điều kiện Mã hàng giống nhau thì cùng màu nhưng xen kẽ, gộp chung với nhau để dễ nhìn
Thanks bạn đã quan tâm

Bạn xài tạm macro này nhé:
[GPECODE=vb]Sub ToMau()
Dim Rng As Range, Cll As Range
Application.ScreenUpdating = False
Set Rng = Intersect(Sheets("TC").[B3].CurrentRegion, Sheets("TC").[B3:B65000])
For Each Cll In Rng
If Cll.Value <> Cll.Offset(-1).Value Then
Intersect(Cll.EntireRow, Sheets("TC").[A]).Interior.ColorIndex = IIf(Cll.Offset(-1).Interior.ColorIndex = 15, -4142, 15)
Else
Intersect(Cll.EntireRow, Sheets("TC").[A]).Interior.ColorIndex = Cll.Offset(-1).Interior.ColorIndex
End If
Next
Application.ScreenUpdating = True
End Sub[/GPECODE]

 

[nghiaphuc]

Bạn thử dùng cột phụ Q
- Q3=IF(B3<>B2;MAX($Q$2:Q2)+1;Q2)
- Chọn vùng có dữ liệu từ A3:Q???, Conditional Formatting, công thức =Mod($Q3;2)=1, chọn màu nền bạn muốn - OK

Thêm một cách dùng CF mà không sử dụng cột phụ:

=MOD(ROUND(SUMPRODUCT(1/COUNTIF($B$3:$B3,$B$3:$B3)),0),2)=1

Lúc đầu em không định dùng hàm ROUND, nhưng mà thấy chưa đúng ý muốn, có lẽ do hàm SUMPRODUCT tính kết quả gần đúng.

 

[ptm0412]

Lúc đầu em không định dùng hàm ROUND, nhưng mà thấy chưa đúng ý muốn, có lẽ do hàm SUMPRODUCT tính kết quả gần đúng.

Rất đơn giản mà Phúc:

Để nguyên phân số thì 1/3 + 1/3 + 1/3 = 1
Nhưng chia lấy kết quả thì 0.33333 + 0.33333 + 0.33333 = 0.99999