Nhập trùng báo lổi. (2 người xem)

[maiemveanhnhe]

Cho em hỏi làm sao không được nhập (X) trùng trong 1 cột

 

[nghiaphuc]

Cho em hỏi làm sao không được nhập (X) trùng trong 1 cột

Bạn chọn vùng B5:E8 và đặt Data Validation cho vùng với tùy chọn: Alow là Custom và Formula là =COUNTA(B$5:B$8)=1

 

[maiemveanhnhe]

Như vậy thì được rồi đó anh PHÚC, tuy nhiên em muốn người nhập phải đánh dấu (X) mới được, theo em nghỉ chỉ còn cách dùng format-->conditional formatting thôi, anh giúp dùm em. cảm ơn anh nhiều

 

[viehoai]

Như vậy thì được rồi đó anh PHÚC, tuy nhiên em muốn người nhập phải đánh dấu (X) mới được, theo em nghỉ chỉ còn cách dùng format-->conditional formatting thôi, anh giúp dùm em. cảm ơn anh nhiều

Vậy thì bạn đổi công thức thành
=COUNTIF(INDIRECT("B5:B" & ROW()-1);"X")=0

 

[maiemveanhnhe]

Sao không được vậy bác viehoai. File đính kèm

 

[maiemveanhnhe]

Sao bị bỏ giữa chừng vậy ta. Alo, alo

 

[nghiaphuc]

Như vậy thì được rồi đó anh PHÚC, tuy nhiên em muốn người nhập phải đánh dấu (X) mới được, theo em nghỉ chỉ còn cách dùng format-->conditional formatting thôi, anh giúp dùm em. cảm ơn anh nhiều

Là "X" hay là gì thì cũng thế thôi chứ khác gì đâu? Thì bạn cứ thống nhất lúc nhập dữ liệu đi. Nếu không thì cứ sử dụng Validation như cách của bạn và kết hợp thêm một chút VBA nữa.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Or Intersect(Target, [B5:E8]) Is Nothing Then Exit Sub
    If WorksheetFunction.CountIf(Intersect(Target.EntireColumn, [B5:E8]), "X") > 1 Then
        MsgBox "Lop nay da duoc phan cong giang day roi."
        Target.ClearContents
        Target.Select
    End If
End Sub

 

[maiemveanhnhe]

Wow cái này hay nè anh phúc. Cảm ơn anh, cảm ơn anh, cảm ơn anh, cảm ơn anh, cảm ơn anh.

 

[viehoai]

Sao bị bỏ giữa chừng vậy ta. Alo, alo

Sửa lại công thức ngắn gọn và tổng quát hơn tí

 

[nghiaphuc]

Thêm một cách khác nữa: Sử dụng Data Validation (ở vùng phía dưới trong file)
- Alow: Custom
- Formula: =AND(B12="X",COUNTA(B$12:B$15)=1)

 

[maiemveanhnhe]

Cảm ơn anh rất nhiều, anh rất nhiệt tình