Giúp em: Khi một trong hai cell điều kiện bị tô màu đỏ thì Code không chạy! (1 người xem)

[Hong.Van]

Em chào thầy cô và anh chị!
Tại Sheet "locngay" em có 2 cell E2 và G2. Hai cell này em có dùng C.F để tô màu đỏ (nếu sai). Tại đây em có sử dụng code Sub loc() để chạy.

Bây giờ em muốn, nếu một trong hai cell E2, G2 hoặc cả hai cell bị tô màu đỏ thì khi bấm nút code Sub loc() thì code sẽ không chạy và thóat khỏi code đồng thời hiện Thông báo bạn nhập sai ngày!
Em muốn đọan code yêu cầu như trên được lồng vào Code loc()
Em cảm ơn!
---------
P/s: Vì code này cho nhiều người trong fòng em sử dụng, nên nhiều anh chị không chịu chú ý khi cell điều kiện báo đỏ, nên cứ bấm code rồi bảo nó báo số liệu sai!?

 

[Hai Lúa Miền Tây]

Bạn thử

Sub Test()

If [e2].Font.ColorIndex = 3 Or [g2].Font.ColorIndex = 3 Then
    MsgBox "Sai"
  Else
    MsgBox "Dung"
End If

End Sub

 

[kyo]

Nó sẽ kiểu kiểu như vậy nè bạn:

If Range("E2").Interior.Color = 255 Or Range("G2").Interior.Color = 255 Then
    MsgBox "Ban da nhap sai ngay"
    Exit Sub
End If

 

[concogia]

Nếu dùng CF để tô màu thì dùng ngay điều kiện tô màu để khống chế
Coi chừng, code không nhận ra màu của CF đâu
Thân

 

[Hong.Van]

Em cảm ơn thầy cô & anh chị!
Điều kiện khống chế để tô màu của em là

=OR(E2<NgayDau;E2>NgayCuoi;E2>MAX(BB))
=OR(G2<NgayDau;G2>NgayCuoi;G2<E2;MONTH(G2)>MONTH(MAX(BB)))

Trong đó NgayCuoi, NgayDau và BB là tên Name
----------------
Cho em hỏi thêm điều kiện khác
Cell I10 của em là công thức, công thức này nếu tìm không thấy thì sẽ trả về #REF!
Và câu hỏi của em giống như bài #1
Em cảm ơn!