Xin các Pro chỉ giáo về nhập dữ liệu trùng nhau. Help me! (9 người xem)

[pxtrg89]

Tinh thần là e có 1 file gồm 2 sheet, trong mỗi sheet gồm 2 cột, một cột chứa số khung và 1 cột chứa số động cơ. Bây giờ e nhập thêm số khung và số động cơ vào 1 sheet mới nữa thì có cách nào lọc được số trùng không ạ. E muốn là khi mình đang nhập ở sheet mới mà chẳng may bị trùng số khung hoặc số động cơ ở 2 sheet trước thì sẽ có thông báo là trùng rồi. Mong các bác chỉ giáo với, e đang đau đầu vì nó. Xin cảm ơn.

 

[kbw1]

Tinh thần là e có 1 file gồm 2 sheet, trong mỗi sheet gồm 2 cột, một cột chứa số khung và 1 cột chứa số động cơ. Bây giờ e nhập thêm số khung và số động cơ vào 1 sheet mới nữa thì có cách nào lọc được số trùng không ạ. E muốn là khi mình đang nhập ở sheet mới mà chẳng may bị trùng số khung hoặc số động cơ ở 2 sheet trước thì sẽ có thông báo là trùng rồi. Mong các bác chỉ giáo với, e đang đau đầu vì nó. Xin cảm ơn.

Bạn gửi file lên đi.

 

[pxtrg89]

Bạn gửi file lên đi.

Đây bạn ơi, mình không phải dân kế toán nên đang đau đầu quá, mong được các bác giúp đỡ.

 

[giaiphap]

Bạn xem đúng ý bạn chưa.

 

[kbw1]

Đây bạn ơi, mình không phải dân kế toán nên đang đau đầu quá, mong được các bác giúp đỡ.

Vấn đề này mình thiên về giải pháp cách làm hơn.
Bạn có thể gộp cả 3 sheet này làm 1 không?
Thêm 1 cột Tên là Lô nữa là xong.
Nếu như vậy mình nghĩ sẽ đơn giản hơn.

 

[pxtrg89]

Bạn xem đúng ý bạn chưa.

Cám ơn. cám ơn bạn rất nhiều nhưng đúng thật là mình có rất nhiều sheet bạn ạ, tại hàng ngày mình phải cập nhật bạn ạ. làm được nhiều sheet như cách của bạn thì đúng thật rất tuyệt vời ^^. rất cám ơn bạn.

 

[pxtrg89]

Nhỡ người ta có cả vài Chục Sheet thì nàm thao,..nàm thao nè...!!!



Nếu bạn biết xài Macro thì thử paste code sau vào ThisWorkbook

Option Explicit


Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Dim Ws As Worksheet, lr As Long, sArr, I As Long
lr = ActiveSheet.Range("A65000").End(3).Row
If Not Intersect(Target, Range("B6:C" & lr)) Is Nothing Then
    For Each Ws In Worksheets
        If Ws.Name <> ActiveSheet.Name Then
            sArr = Ws.Range("B6:C" & Ws.Range("A65000").End(3).Row).Value
            For I = 1 To UBound(sArr)
                If sArr(I, 1) = Target.Value Or sArr(I, 2) = Target.Value Then
                    MsgBox "Trùng rô`i nha Kung": Exit Sub
                End If
            Next I
        End If
    Next Ws
End If
End Sub

Mình không rõ macrco lắm nhưng mình sẽ cố tìm hiểu xem. rất cám ơn bạn. để mình thử cách này.

 

[pxtrg89]

Vấn đề này mình thiên về giải pháp cách làm hơn.
Bạn có thể gộp cả 3 sheet này làm 1 không?
Thêm 1 cột Tên là Lô nữa là xong.
Nếu như vậy mình nghĩ sẽ đơn giản hơn.

Mình cũng đã từng nghĩ tới phương án đó cơ mà của mình nhiều lắm, cả mấy năm về trước nữa nên mình nghĩ làm như thế hơi rối rắm, nếu có thể để thành từng sheet thì quá đẹp, hiện tại mình để theo từng folder 1 nên toàn bị nhầm, rất khổ. Rất cám ơn bạn.

 

[kbw1]

Mình cũng đã từng nghĩ tới phương án đó cơ mà của mình nhiều lắm, cả mấy năm về trước nữa nên mình nghĩ làm như thế hơi rối rắm, nếu có thể để thành từng sheet thì quá đẹp, hiện tại mình để theo từng folder 1 nên toàn bị nhầm, rất khổ. Rất cám ơn bạn.

Làm 1 sheet là ok nhất.
Từng sheet thì đẹp, nhưng khi cần tổng hợp thì méo mặt đấy.
Đấy là kinh nghiệm thôi.

 

[pxtrg89]

Làm 1 sheet là ok nhất.
Từng sheet thì đẹp, nhưng khi cần tổng hợp thì méo mặt đấy.
Đấy là kinh nghiệm thôi.

Vậy nếu gộp vào thì có cách nào làm không bạn ơi. chỉ mình với mình xem thế nào.

 

[giaiphap]

Vậy nếu gộp vào thì có cách nào làm không bạn ơi. chỉ mình với mình xem thế nào.

Nếu gộp vào thì làm theo cách của tôi ở trên đó. Tôi nghĩ dữ liệu nên gộp vào và có thêm cột Lô, muốn xem lô nào thì trích lọc sang một sheet nửa để xem. Lúc này nhập liệu, thống kê, báo cáo sẽ dễ dàng hơn.

 

[pxtrg89]

1.Mở file excel của bạn lên
2. Alt+F11. Cửa sổ mở ra...
3. Nhìn góc trên bên trái màn hình vừa mở ra có dòng chữ ThisWorkbook thì click vào chữ này -> cửa sổ mở ra. Copy code ở trên paste vào đó
4. Quay trở lại Excel bạn thử gõ vào Sheet mã trùng với các sheet kia xem

P/s: excel trên máy bạn phải được Enable macro...Không biết cách thì download file post #2 của topic này về mà Enable macro lên...https://www.google.com.vn/url?sa=t&...-2010)&usg=AFQjCNE6l5owFEke_u3v0llON4STs3Phxg

Cám ơn bạn nhé, mình làm thử xem.

 

[pxtrg89]

1.Mở file excel của bạn lên
2. Alt+F11. Cửa sổ mở ra...
3. Nhìn góc trên bên trái màn hình vừa mở ra có dòng chữ ThisWorkbook thì click vào chữ này -> cửa sổ mở ra. Copy code ở trên paste vào đó
4. Quay trở lại Excel bạn thử gõ vào Sheet mã trùng với các sheet kia xem

P/s: excel trên máy bạn phải được Enable macro...Không biết cách thì download file post #2 của topic này về mà Enable macro lên...https://www.google.com.vn/url?sa=t&...-2010)&usg=AFQjCNE6l5owFEke_u3v0llON4STs3Phxg

mình vừa làm theo cách của bạn thì ra rồi, cơ mà có cách nào mình phát hiện được trùng ở chỗ nào không bạn ơi. có thể truy xuất dữ liệu trùng ra không bạn ơi.

 

[hcminh2016]

mình vừa làm theo cách của bạn thì ra rồi, cơ mà có cách nào mình phát hiện được trùng ở chỗ nào không bạn ơi. nếu cả số động cơ nữa thì làm như nào cơ.

-----------------------------------

 

[kbw1]

Vậy nếu gộp vào thì có cách nào làm không bạn ơi. chỉ mình với mình xem thế nào.

Nếu gộp vào thì bạn chỉ việc dùng chức năng Duplicate Values cho từng cột là nó sẽ tự động báo cho bạn khi có dữ liệu nhập trùng.