VBA30 Trích lọc dữ liệu trùng lặp trong nhiều bảng tính theo điêu kiện



Trích lọc dữ liệu trùng lặp trong nhiều bảng tính theo điều kiện, quản lý dữ liệu, kiểm tra code VBA, sumif, countif
Một sản phẩm của
Học Excel cùng ĐT Nguyễn:
▷ Khoá học “Học Excel, Có Việc Ngay”: ​
▷ Xem ngay “Tự động hoá Excel và báo cáo với VBA”:

▷ Theo dõi Facebook cá nhân:
▷ Blog cá nhân:
▷ Video được cung cấp miễn phí bởi
▷ Facebook Group:

Khám phá thêm thật nhiều kiến thức với Học Excel Online:
🔑 Học Excel, Có Việc Ngay: ​
🔑 Hãy để VBA giúp bạn:

Download file kèm theo video tại:

Xem thêm video học và các thủ thuật excel: https://mindovermetal.org/thu-thuat-excel/

Subscribe
Notify of
guest
12 Comments
Oldest
Newest Most Voted
Inline Feedbacks
View all comments
Phạm Thế Huy

Video rất hay.

Lê Minh Thiện

Cho em hỏi nếu mà mình xét trong 2 workbook khác nhau thì phải làm thế nào ?

Đây là nội dung nhỏ trong bộ khoá học:
▷ Khoá học "Học Excel, Có Việc Ngay": ​http://bit.ly/ex101_dtnguyen

▷ Xem ngay "Tự động hoá Excel và báo cáo với VBA": http://bit.ly/vba101_dtnguyen

▷ Theo dõi Facebook cá nhân: https://fb.me/kuldokk

▷ Blog cá nhân: https://blog.hocexcel.online

▷ Video được cung cấp miễn phí bởi https://hocexcel.online

▷ Facebook Group: http://bit.ly/heoFBG



Khám phá thêm thật nhiều kiến thức với Học Excel Online:

🔑 Học Excel, Có Việc Ngay: ​https://www.hocexcel.online/ex101

🔑 Hãy để VBA giúp bạn: https://www.hocexcel.online/vba101

Trung Bui

Hy vọng bạn càng ngày càng ra nhiều video bổ ích hơn. Cảm ơn bạn đã chia sẻ kiến thức.

Khoi Lai

Chào bạn
mình theo giỏi thấy bạn có nhiều bài rất hay và hữu ích ..
mình củng muốn học theo cách của bạn ,,

Sau đây mình có 1 Code như dưới đây để lọc các ô trùng nhau .
cú pháp =UniqueList(dảy tham chiếu;ROWS($1:1))

Option Explicit
Function UniqueList(Range As Range, Pos As Long) As String
Dim Clls As Range, Dic
Set Dic = CreateObject("Scripting.Dictionary")
For Each Clls In Range
If Not IsEmpty(Clls) And Not Dic.Exists(Clls.Value) Then
Dic.Add Clls.Value, Clls.Value: Pos = Pos – 1
If Pos = 0 Then
UniqueList = Clls: Exit Function
End If
End If
Next Clls
Set Dic = Nothing
End Function

mình củng đả lưu như các bạn chỉ … nhưng chỉ làm được trên file lưu thôi còn các trang khác trong excel thì không thực hiện được hàm này ..
Mong bạn chỉ giáo và có gì hay thì hảy chia sẽ cho anh em … Xin cám ơn bạn..chúc bạn khỏe Hạnh phúc ..
ĐT: 0938 943 618 Email : khoien19@gmail.com

trang bùi

anh giảng nhanh + quá nhỏ . e bật loa đeo tai nghe mà cứ không nghe đc

Huy Pham

vba mình ko dành lắm nhưng mình thấy vba rất hay, mà chưa có điều kiện tìm hiểu nhưng vs dữ liệu bài bài này
mình làm cách này nha coppy part spe ở 2 shet thành 1shet và dùng chức năng xóa nếu dữ liệu nào trùng nhau chúng sẽ bỏ
chỉ lấy 1 dữ liệu và dùng sum if và công chúng lại là ok, mình làm thủ công mất chưa đến 3
phut

Mr Le

nói nhỏ quá

Hồ Trung Vũ

klq đến video này nhưng mà anh cho em hỏi 1 vấn đề nhé:
Khi em tạo 1 function và add-in lên Excel thì lúc viết hàm trên excel nó không hiện ra các tham số của hàm. Ví dụ như hàm Sum: =Sum(number1, number2….)

tung ngo

Anh ĐT nguyễn có thể cho em đoạn code ko ạ!em xin cám ơn!

Cong Dung Nguyen

Bạn ĐT Nguyễn có thể làm 1 video hướng dẫn như vậy ko
https://www.youtube.com/watch?v=I5xnyQ1C61c

Thoa Nguyễn

Thanks ban nhe.