Tim dữ liệu bị trùng, cập nhật ngày và đánh tim cọc đã thi công rồi! (1 người xem)

[nghiahuu]

Mình đang cần gấp để hoàn chỉnh hồ sơ! Nhờ các bạn giúp đỡ nhe!Các bạn xem file đính kèm mình có gởi !

 

[nghiahuu]

Sao ko thấy ai trả lời dậy ta?

 

[nhapmon]

thử giải yêu cầu thứ nhất của bạn.
mình thử sử dụng vba nha, hàm không biết sao làm.
cái này viết bằng cthức mảng chắc hay hơn, nhưng mình ko biết đành viết bằng code rừng vậy.

có cao thủ nào hổ trợ dùm với.
yêu cầu thứ nhất của bạn ấy là tìm một cặp số trùng nhau. thí dụ trên cột D và cột F có một cặp 15-6 trùng nhau.


cách bố trí data của bạn đúng là thách thức người ta thiệt.
yều cầu thứ 2 chắc phải dùng hàm index và match, nhưng chưa tìm được cách giải.

yêu cầu thứ 3: đánh dấu chử R cho cột thì công rồi, tìm dữ kiện ở đâu để biết nó rồi bạn?

 

[VMH0307]

Tôi giải thử bằng công thức xem thế nào nhé, các công thức bạn xem trong Conditional Format và Name, không biết có đúng ý bạn không.
Bạn xem theo file đính kèm.
(file đính kèm chuyển xuống bài số #8)

 

[nhapmon]

nếu mình insert thêm dòng thì ở cột G và H, bị đỏ, trong khi ở cột D,E và J,k lại ko bị.
sao kỳ vậy anh(or chị).

 

[VMH0307]

nếu mình insert thêm dòng thì ở cột G và H, bị đỏ, trong khi ở cột D,E và J,k lại ko bị.
sao kỳ vậy anh(or chị).

Cái này là chỗ công thức trong Conditional Format tại cột G và H bị nhầm tí chút:
Phải sửa lại thành như thế này
=(SUMPRODUCT(($G$6:$G$19=$G6)*1,($H$6:$H$19=$H6)*1)+SUMPRODUCT(($J$6:$J$19=$G6)*1,($K$6:$K$19=$H6)*1)>=2)*($G6<>"")*($H6<>"")
Do mình cố định $G$6 và $H$6.

 

[nghiahuu]

Cám ơn các bạn nhiều! câu hỏi thứ 1 ok rồi! còn còn hai câu hỏi thứ 2,3 chưa có đáp án chính xác! mình gửi lại file đính kèm làm chi tiết hơn! Nhờ các bạn giúp đỡ thêm.thanks

 

[VMH0307]

Bạn xem trong file đính kèm nhé. Tôi cứ giả định nếu số liệu thực của bạn có nhiều trường hợp cùng số hiệu, cùng chiều dài mà ngày SX hoặc ngày ép khác nhau thì sẽ lấy ngày gần nhất (đó là lý do có hàm max trong công thức).

 

[nghiahuu]

OK! Cám ơn bạn tttmuahmuah nhiều lắm nhe!

 

[nghiahuu]

Hình như khi tìm ngày SX không biết bạn có phân biệt đoạn bằng và đoạn nhọn không nhỉ!! VD: 15mN và 15mB hoặc 12mN và 12mB. Tại mình thấy ngày bị nhảy khi 15mN và 15mB có cùng số hiệu!

 

[nghiahuu]

Gửi lại bạn file đính kèm để bạn xem nhe!

 

[VMH0307]

Hình như khi tìm ngày SX không biết bạn có phân biệt đoạn bằng và đoạn nhọn không nhỉ!! VD: 15mN và 15mB hoặc 12mN và 12mB. Tại mình thấy ngày bị nhảy khi 15mN và 15mB có cùng số hiệu!

Yêu cầu của bạn như vậy

2/ Tìm ngày SX bên cấp cọc cập nhật cho bên thi công dựa vào chiểu dài và số hiệu.
3/ Tìm tim cọc nảo thi công rồi thì đánh chữ "R" và ngảy ép vào bên cấp cọc dựa trên số hiệu và Chiều dài.

Do đó tôi làm như vậy, còn nếu phân biệt "B" và "N" thì bạn xem theo file đính kèm (Tôi cũng sửa lại ngày ép cho phù hợp với điều kiện "B", "N" luôn)

 

[Quang_Hải]

Cám ơn các bạn nhiều! câu hỏi thứ 1 ok rồi! còn còn hai câu hỏi thứ 2,3 chưa có đáp án chính xác! mình gửi lại file đính kèm làm chi tiết hơn! Nhờ các bạn giúp đỡ thêm.thanks

Thấy bài này cũng lâu rồi nhưng chưa thử sức.
Bạn tham khảo cách xử lý bằng code. Lằng nhằng tí nhưng vẫn code được. Chú ý cái số 08mB mình sửa lại 8mB

Sub NSX()
Dim data1(), data2(), i, j, dk, tencoc(), x, k
data1 = Range([C6], [C65536].End(3)).Resize(, 10).Value
data2 = Range([R6], [R65536].End(3)).Resize(, 11).Value
tencoc = [T3:Z3].Value
For j = 1 To UBound(data1)
   For i = 2 To 10 Step 3
      dk = IIf(i = 2, data1(j, i) & "mN", data1(j, i) & "mB")
      For x = 1 To UBound(tencoc, 2)
         If dk = tencoc(1, x) Then
            For k = 1 To UBound(data2)
               If UCase(data2(k, x + 2)) = "X" Then
                  If tencoc(1, x) & data2(k, 1) = dk & data1(j, i + 1) Then
                     data1(j, i + 2) = data2(k, 2)
                     data2(k, 11) = data1(j, 1)
                     data2(k, 10) = "R"
                  End If
               End If
            Next
         End If
      Next
   Next
Next
[C6].Resize(j - 1, 10) = data1
[R6].Resize(k - 1, 11) = data2
End Sub