Giúp tự động chuyển về giá trị đầu tiên nếu phát hiện trùng trong danh sách nhập

[tueyennhi]

Chào anh chị

Em có cột Code ở cột B. Cột này em sẽ nhập tay, mã code phải là duy nhất. Có cách nào nếu em nhập một mã code mà nó đã tồn tại thì excel tự động select đến cái code đã nhập trước đó rồi không anh chị?

 

[befaint]

Data Validation?

 

[Nguyễn Hồng Quang]

Data Validation?

Nếu người nhập vì 1 lý do nào đó (đãng trí, mải vui) quên mất bỏ qua cảnh báo trùng mã, cố ý để xảy ra trùng. (ví dụ có 2 mã 100, 1 cái ở B3, 1 cái ở B9) thì nhập tiếp 1 mã 100 nữa thì nó vẫn chạy về B3 mà không phải B9.

 

[befaint]

Nếu người nhập vì 1 lý do nào đó (đãng trí, mải vui) quên mất bỏ qua cảnh báo trùng mã, cố ý để xảy ra trùng. (ví dụ có 2 mã 100, 1 cái ở B3, 1 cái ở B9) thì nhập tiếp 1 mã 100 nữa thì nó vẫn chạy về B3 mà không phải B9.

Rồi lần sau sẽ tìm thấy nó thôi mà. Nếu mà đẵng trí tiếp thì tự gánh vì không đảm bảo sức khoẻ khi lao động.

(Cái này ngoài lề: Mình thấy một số chủ thớ thấy bài của mình là lặng lẽ lấy về dùng, rồi... cứ thế lặng lẽ luôn nhé.)

 

[Nguyễn Hồng Quang]

Rồi lần sau sẽ tìm thấy nó thôi mà. Nếu mà đẵng trí tiếp thì tự gánh vì không đảm bảo sức khoẻ khi lao động.

(Cái này ngoài lề: Mình thấy một số chủ thớ thấy bài của mình là lặng lẽ lấy về dùng, rồi... cứ thế lặng lẽ luôn nhé.)

Vâng! Nhưng mà cũng có thể đôi khi là chủ thớt xúc động , không biết nói lời cảm tạ mọi người thế nào cho xứng đáng.

 

[tueyennhi]

Hình như diễn đàn có chút trục trặc. Em không vào chủ đề mà chỉ Refesh trang web nhưng không thấy báo chủ đề của mình được trả lời.

Cảm ơn tất cả mọi người nhé, em cũng mới làm được cái này

Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Dim rng As Range
Set rng = Range("A3:A5000").Find("2", LookIn:=xlValues, Lookat:=xlWhole)
If Not rng Is Nothing Then
    Cells(RDB_Last(1, [B:B]), 2).ClearContents
    rng.Offset(0, 1).Select
End If
End Sub

Nguyên tắc là em lập thêm cột phụ và thêm hàm đếm, nếu là 2 thì đoạn code trên kia sẽ hoạt động theo ý em (Xóa code trùng và chỉ đến code đã được nhập . Hàm RDB em tham khảo trong chủ đề này
Các hàm hữu ích

Bài đã được tự động gộp: 16/8/18

Rồi lần sau sẽ tìm thấy nó thôi mà. Nếu mà đẵng trí tiếp thì tự gánh vì không đảm bảo sức khoẻ khi lao động.

(Cái này ngoài lề: Mình thấy một số chủ thớ thấy bài của mình là lặng lẽ lấy về dùng, rồi... cứ thế lặng lẽ luôn nhé.)

Ha ha, befaint ơi do không thông báo nên mình không biết là chủ đề của mình đã được bạn giải quyết ổn thỏa đó chứ. Mình vừa mò xong, post lên khoe thì mới biết là rất nhiều member vào thảo luận đóng góp. Cảm ơn mọi người nhé!

Bài đã được tự động gộp: 16/8/18

Nếu người nhập vì 1 lý do nào đó (đãng trí, mải vui) quên mất bỏ qua cảnh báo trùng mã, cố ý để xảy ra trùng. (ví dụ có 2 mã 100, 1 cái ở B3, 1 cái ở B9) thì nhập tiếp 1 mã 100 nữa thì nó vẫn chạy về B3 mà không phải B9.

Nguyên tắc của mình không cho phép lặp nên không có chuyện đó xảy ra với mình .

 

[tueyennhi]

Data Validation?

Mình xem từ hôm qua đến giờ cái code của bạn, xem mãi chẳng hiểu cách thức nó hoạt động như nào . Cái này chắc phải mất nhiều thời gian nữa mình mới có thể hiểu để tùy biến vận dụng nó. Cảm ơn bạn nhé!

 

[tueyennhi]

Cho em hỏi thêm. Làm thế nào để bắt được sự kiện enter? Mục đích của em là muốn nếu enter thì nó sẽ select ô cuối cùng của cột B. Vì theo câu lệnh trước nó sẽ di chuyển lên code trùng, em muốn sau khi nhập xong dữ liệu em enter thì nó lại tự động nhảy về dòng cuối