cập nhật dữ liệu lọc bõ những đối tượng trùng lập.

[hoangvu1901]

Dear các Exp.
Mình có rất nhiều cột dữ liệu trong rất nhiều sheet khác nhau.
ví dụ. Cột A (sheet1)
a
b
c
a
d
.
.
Cột A của sheet 2.
c
a
b
e
d
f
và sheet tổng, em muốn lấy tất cả các dữ liệu của cột A (sheet 1, sheet 2) nhưng các dữ liệu trùng lặp nhau sẽ được bỏ đi.
vì dữ liệu của em rất khổng lồ nên không thể làm thủ công được.
Các exp nào biết thì chỉ em với nhé.
cám ơn.

Bạn ko có file đính kèm nên viết đại thôi, trên diễn đân nhiều lắm

Sub Tim()Dim WS As Worksheet, Sarr, Arr(1 To 65000, 1 To 1), i As Long, k As LongDim Dic As ObjectSet Dic = CreateObject("Scripting.Dictionary")For Each WS In Worksheets    If WS.Name <> "TH" Then        Sarr = WS.Range("A1", WS.[A65000].End(xlUp)).Resize(, 1).Value2            For i = 1 To UBound(Sarr, 1)                If Not Dic.exists(Sarr(i, 1)) Then                    k = k + 1                    Dic.Add Sarr(i, 1), k                    Arr(k, 1) = Sarr(i, 1)                End If            Next    End IfNextWith Sheets("TH")    .[A1:A65000].ClearContents    .[A1].Resize(k, 1).Value = Arr     .[A1].Resize(k, 1).Borders.LineStyle = 1End WithSet Dic = NothingEnd Sub  

View more random threads:

• Cách tách bảng lương?
• Cách làm phiếu in thu chi tự động theo quyết định số 48
• Mọi người chỉ giúp mình cách cộng các mặt hàng giống nhau ở nhiều sheet
• File Excel bị lỗi đánh số thứ tự trang
• nhờ cả nhà giúp đỡ nhé....
• So Sánh Khác Chữ
• Xin giup đỡ về biểu đồ tiến độ
• phần mềm quản lý thu chi
• Lỗi khi mở file đuôi .xls
• [HELP] Giúp e link dữ liệu từ sheet đầu tiên sang sheet thứ 2

[tungover]

Dear các Exp.
Mình có rất nhiều cột dữ liệu trong rất nhiều sheet khác nhau.
ví dụ. Cột A (sheet1)
a
b
c
a
d
.
.
Cột A của sheet 2.
c
a
b
e
d
f
và sheet tổng, em muốn lấy tất cả các dữ liệu của cột A (sheet 1, sheet 2) nhưng các dữ liệu trùng lặp nhau sẽ được bỏ đi.
vì dữ liệu của em rất khổng lồ nên không thể làm thủ công được.
Các exp nào biết thì chỉ em với nhé.
cám ơn.

[misuto]

Dear các Exp.
Mình có rất nhiều cột dữ liệu trong rất nhiều sheet khác nhau.
ví dụ. Cột A (sheet1)
a
b
c
a
d
.
.
Cột A của sheet 2.
c
a
b
e
d
f
và sheet tổng, em muốn lấy tất cả các dữ liệu của cột A (sheet 1, sheet 2) nhưng các dữ liệu trùng lặp nhau sẽ được bỏ đi.
vì dữ liệu của em rất khổng lồ nên không thể làm thủ công được.
Các exp nào biết thì chỉ em với nhé.
cám ơn.

Copy dữ liệucột A của 2 sheet vào 1 cột rồi dùng Remove Duplicates

[mrti0810]

Bạn có thể dùng pivot table nhé.