Sử lý validation

[luuthiquynhqt]

mình tạo một list các số phiếu từ một danh sách nhưng trong danh sách có nhiều số phiếu trùng nhau
các bạn hướng dẫn mình làm thế nào để tạo một list ma mỗi số phiếu chỉ hiển lên một lần
các bạn cố gắng dùng công thức nhé vì mình không biết lập trình
mình không gửi bài lên được
VD: mính có một danh sách sau
PX1/2
PX1/2
PX2/2
PX2/2
PX3/2
PX3/2
......
Mình tạo một list ở một sweet khác nhưng nó hiển cả 6 mục trên mình muốn chỉ hiện PX1/2,PX2/2,PX3/2

 

[nam2806]

Tôi thường làm đơn giản như thế này, file đính kèm.

 

[ba.ho_eis]

mình tạo một list các số phiếu từ một danh sách nhưng trong danh sách có nhiều số phiếu trùng nhau
các bạn hướng dẫn mình làm thế nào để tạo một list ma mỗi số phiếu chỉ hiển lên một lần
các bạn cố gắng dùng công thức nhé vì mình không biết lập trình
mình không gửi bài lên được
VD: mính có một danh sách sau
PX1/2
PX1/2
PX2/2
PX2/2
PX3/2
PX3/2
......
Mình tạo một list ở một sweet khác nhưng nó hiển cả 6 mục trên mình muốn chỉ hiện PX1/2,PX2/2,PX3/2

Bạn có thể dùng chức năng Advanced filter:

 

[luuthiquynhqt]

các bạn xem file giúp mình nhé

 

[luuthiquynhqt]

co bác nào giúp em với em

 

[concogia]

co bác nào giúp em với em

Mình có vài ý kiến:
_Trong cột dữ liệu có khoảng trắng như trong ví dụ không? Nếu có phải xử lý "em" này trước (trong bài mình chưa "xử" em này)
_Nếu dùng công thức phải có cột phụ ( cái này nhẹ nhàng hơn)
_Nếu dùng code cũng ....phải có cột phụ (ở đâu cũng được) nếu muốn giữ lại dữ liệu tạo vali...gốc
Trong bài đính kèm mình làm một vali.. bằng code, nhưng vì không có file nên đây chỉ là bài tham khảo
Phải chi có file của bạn cho nó ..."phẻ"
Thân

 

[tam8678]

Trong bài đính kèm mình làm một vali.. bằng code, nhưng vì không có file nên đây chỉ là bài tham khảo
Phải chi có file của bạn cho nó ..."phẻ"
Thân

---
Anh concogia vui tính thật, nhưng mà sau khi chạy code thì trong validation không phải là những phiếu trích lọc duy nhất anh ơi....nhìn mãi, nhìn mãi, nhìn mãi thấy có 2 phiếu PX3/2 ( thấy anh vui thì em vui theo. Lỗi này gặp chú NDU thì ... "Sử lý liền")
Chúc anh khỏe và dzô đều đều.

 

[concogia]

---
Anh concogia vui tính thật, nhưng mà sau khi chạy code thì trong validation không phải là những phiếu trích lọc duy nhất anh ơi....nhìn mãi, nhìn mãi, nhìn mãi thấy có 2 phiếu PX3/2 ( thấy anh vui thì em vui theo. Lỗi này gặp chú NDU thì ... "Sử lý liền")
Chúc anh khỏe và dzô đều đều.

"Só zy", sửa lại một tí ,"zo" xong về làm nên mới nhầm
Set vung = Range([a2, [a2.End(xlDown)) thành
Set vung = Range([a1], [a1].End(xlDown))
Hihi, hột vịt còn lộn chứ nói chi người ta
Cám ơn bạntam8678

 

[tam8678]

"Só zy", sửa lại một tí ,"zo" xong về làm nên mới nhầm
Set vung = Range([a2, [a2.End(xlDown)) thành
Set vung = Range([a1], [a1].End(xlDown))
Hihi, hột vịt còn lộn chứ nói chi người ta
Cám ơn bạntam8678

---
Anh ơi, vẫn còn "hột vịt lộn" nữa chứ chẳng thôi, sửa lại như thế thì trong "vali" bao gồm luôn tiêu đề là "số phiếu". Anh concogia vui thật, vẫn còn... dư âm của ngày hôm qua.

 

[ndu96081631]

---
Anh ơi, vẫn còn "hột vịt lộn" nữa chứ chẳng thôi, sửa lại như thế thì trong "vali" bao gồm luôn tiêu đề là "số phiếu". Anh concogia vui thật, vẫn còn... dư âm của ngày hôm qua.

Vầy đi

Private Sub CommandButton1_Click()
  On Error Resume Next
  Range("BZ:BZ").ClearContents
  Application.ScreenUpdating = False
  With Range([A1], [A65536].End(xlUp))
    .AdvancedFilter 2, , [BZ1], True
  End With
  With Range([BZ1], [BZ65536].End(xlUp))
    .Sort .Cells(1, 1), 1, , , , , , xlYes
  End With
  Application.ScreenUpdating = True
End Sub

1 vài thứ ta làm bằng tay là được rồi, không cần ghi thành code (chẳng hạn List cho Validation)
Ngoài ra phải xem lại dữ liệu, có những ô nhìn thấy rổng nhưng thật sự lại không phải rổng
Nói chung: Dữ liệu tào lao ráng chịu

 

[concogia]

---
Anh ơi, vẫn còn "hột vịt lộn" nữa chứ chẳng thôi, sửa lại như thế thì trong "vali" bao gồm luôn tiêu đề là "số phiếu". Anh concogia vui thật, vẫn còn... dư âm của ngày hôm qua.

Hihi tại ăn 2 trái nên lộn 2 lần==> về chỗ cũ
Set tam = Range([bz1], [bz1].End(xlDown)) thành
Set tam = Range([bz2], [bz2].End(xlDown))
"Bi" giờ tỉnh rồi
Thân