Conditional formatting

[Quang_Hải]

Mình có vấn đề này cần các bạn giúp. Nếu nội dung ô A2 khác A1 thì ô A2 sẽ chuyển sang 1 màu khác ô A1, nếu nội dung ô
A3 khác A2 thì sex tự động chuyển sang màu khác. Có bạn nào biết cách thì giúp mình với. Sử dụng code cũng được.

 

[TrungChinhs]

Mình có vấn đề này cần các bạn giúp. Nếu nội dung ô A2 khác A1 thì ô A2 sẽ chuyển sang 1 màu khác ô A1, nếu nội dung ô
A3 khác A2 thì sex tự động chuyển sang màu khác. Có bạn nào biết cách thì giúp mình với. Sử dụng code cũng được.

Bạn thử code này xem

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, [a2:a1000]) Is Nothing Then
        Target.Interior.ColorIndex = 0
        If Selection.Rows.Count > 1 Then Selection.Interior.ColorIndex = 0: Exit Sub
        If Target <> 0 And Target.Value <> Target(0).Value Then Target.Interior.ColorIndex = 35
    End If
End Sub

 

[Quang_Hải]

Cảm ơn bạn nhiều nhưng chưa đúng yêu cầu mình đang cần. Ý của mình là nếu A2 khấc A1 thì A2 đổi màu, và nếu A3 khác A2 thì A3 sẽ có màu khấc với A2 luôn.

 

[Quang_Hải]

Mình bổ sung thêm ý của mình cho các bạn hiểu và giúp dùm. nếu A1 và A2 có nôi dung giông nhau thi có cùng 1 màu, nếu A3,A4,A5 có nội dung giong nhau thì se có màu khác, và A6,A7... giong nhau thì se có màu khác.

 

[yeudoi]

Mình bổ sung thêm ý của mình cho các bạn hiểu và giúp dùm. nếu A1 và A2 có nôi dung giông nhau thi có cùng 1 màu, nếu A3,A4,A5 có nội dung giong nhau thì se có màu khác, và A6,A7... giong nhau thì se có màu khác.

Bạn gửi file lên và nói luôn yêu cầu của mình trong file dễ hơn, chứ nhiều lúc diễn đạt không hết ý.

 

[Quang_Hải]

Bạn gửi file lên và nói luôn yêu cầu của mình trong file dễ hơn, chứ nhiều lúc diễn đạt không hết ý.

Mình gởi file lên các bạn xem và giúp đở dùm.

 

[TrungChinhs]

Cảm ơn bạn nhiều nhưng chưa đúng yêu cầu mình đang cần. Ý của mình là nếu A2 khấc A1 thì A2 đổi màu, và nếu A3 khác A2 thì A3 sẽ có màu khấc với A2 luôn.

Khác màu chỉ là để dễ phân biệt thôi nếu dùng nhiều màu quá thì hòa cả làng. Với tôi nếu quá 5 màu thì tẩu hỏa nhập ma luôn (vì chẳng thể nhớ nổi màu nào cho trường hợp nào). Bạn định sử dụng bao nhiêu màu nếu trong bảng tính của bạn có > 256 trường hợp khác nhau.

 

[ChanhTQ@]

Bạn dùng thử cái ni, macro sự kiện

Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Intersect(Target, Columns("A:A")) Is Nothing Then
   If Target.Value <> Target.Offset(-1).Value Then _
      Target.Interior.ColorIndex = 34 + Target.Row Mod 10
 End If
End Sub

 

[Quang_Hải]

Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Intersect(Target, Columns("A:A")) Is Nothing Then
   If Target.Value <> Target.Offset(-1).Value Then _
      Target.Interior.ColorIndex = 34 + Target.Row Mod 10
 End If
End Sub

Đúng rồi, mình chỉ cần khi 2 ô có cùng nội dung thì có chung 1 màu, màu gì cũng được cho dễ phân biệt tránh bị nhầm lẫn thôi

 

[SA_DQ]

To Trung Chính

Bản đồ các nước của 1 châu lục cũng chỉ cần dùng 4 màu khác nhau mà thôi!

5 màu đã là quá dư rồi; Thất ra về lí mà nói, chỉ cần dùng 3 màu là đủ, nhưng lại không dùng được CF đâu đó nha!