xóa các tên trùng nhau

be09 · 10/7/14

Ðề: xóa các tên trùng nhau

syhuynh09 nói:
Mình có danh sách tổng các nhân viên, và danh sách các nhân viên nhận tiền giờ có cách nào để mình lấy ra từ danh sách tổng đó các nhân viên chưa nhận tiền không

Bạn tải File lên (chỉ cần 30 dòng dữ liệu là đủ), mới biết cần trích lọc dữ liệu bắt đầu từ dòng nào cột nào mới làm được, còn nói khơi khơi như vầy thì bó tay, sẽ không ai giải quyết giúp được.

syhuynh09 · 10/7/14

Ðề: xóa các tên trùng nhau

be09 nói:
Bạn tải File lên (chỉ cần 30 dòng dữ liệu là đủ), mới biết cần trích lọc dữ liệu bắt đầu từ dòng nào cột nào mới làm được, còn nói khơi khơi như vầy thì bó tay, sẽ không ai giải quyết giúp được.

Mình không biết cách tải file lên....giờ mình nói cụ thể như thê này bạn giúp mình nhá.
mình có một danh sách khoảng 1000 hộ gồm (Tên, Số tờ bản đồ, số thửa diện tích ) danh sách này là danh sách tổng
danh sách thứ 2 là cũng gồm khoảng 900 dòng các thông tin như thế.
mục đích của mình là lọc ra và xóa các mục đã có ở cả hai sheet.dữ liệu các dòng mà hai sheet không trùng nhau, bạn giúp mình đc không

be09 · 10/7/14

Ðề: xóa các tên trùng nhau

syhuynh09 nói:
Mình không biết cách tải file lên....giờ mình nói cụ thể như thê này bạn giúp mình nhá.
mình có một danh sách khoảng 1000 hộ gồm (Tên, Số tờ bản đồ, số thửa diện tích ) danh sách này là danh sách tổng
danh sách thứ 2 là cũng gồm khoảng 900 dòng các thông tin như thế.
mục đích của mình là lọc ra và xóa các mục đã có ở cả hai sheet.dữ liệu các dòng mà hai sheet không trùng nhau, bạn giúp mình đc không

Bạn nêu địa chỉ Mail để tôi liên hệ qua Mail rồi Mail File cho tôi, tôi sẽ giúp vụ này là nghề của tôi trên 30 năm rồi.

Bạn là thành viên mới nên File của bạn không đủ Quota để tải File lên.

autokiss · 11/7/14

Ðề: xóa các tên trùng nhau

Có ai up file của chủ topic lên cho mọi người tham khảo không ạ? Cảm ơn!

be09 · 11/7/14

Ðề: xóa các tên trùng nhau

autokiss nói:
Có ai up file của chủ topic lên cho mọi người tham khảo không ạ? Cảm ơn!

Muốn tham khảo thì Up File của em lên mọi người giúp thì sẽ cụ thể và dễ hiểu hơn.

syhuynh09 · 11/7/14

Ðề: xóa các tên trùng nhau

be09 nói:
Bạn nêu địa chỉ Mail để tôi liên hệ qua Mail rồi Mail File cho tôi, tôi sẽ giúp vụ này là nghề của tôi trên 30 năm rồi.

Bạn là thành viên mới nên File của bạn không đủ Quota để tải File lên.

Anh cho em mail của anh đi có j em mail nhờ anh giúp,cả số đt của anh luôn thì càng tốt

be09 · 11/7/14

Ðề: xóa các tên trùng nhau

syhuynh09 nói:
Anh cho em mail của anh đi có j em mail nhờ anh giúp,cả số đt của anh luôn thì càng tốt

Sao em không nêu địa chỉ Mail lên, có địa chỉ Mail anh sẽ mail qua cho 1 File để tham khảo (lúc này em sẽ có địa chỉ Mail của anh mà).

Anh ngại đưa địa chỉ Mail lên đây vì sợ nhiều em biết gửi File qua hỏi nhiều anh sẽ không có thời gian để trả lời, vì anh chỉ rảnh có buổi tối.

badday03 · 12/7/14

Ðề: xóa các tên trùng nhau

Anh be09 ơi email của em là ngochoang.aof@gmail.com. Em đã hỏi anh ở topic này: www.danketoan.com/forum/excel-va-vba/hop-nhat-nhieu-file-vao-1-file-2.205529.html#post1115736. Mong anh giúp đỡ ạ.

be09 · 12/7/14

Ðề: xóa các tên trùng nhau

badday03 nói:
Anh be09 ơi email của em là ngochoang.aof@gmail.com. Em đã hỏi anh ở topic này: www.danketoan.com/forum/excel-va-vba/hop-nhat-nhieu-file-vao-1-file-2.205529.html#post1115736. Mong anh giúp đỡ ạ.

Anh đã xem File để anh tham khảo rồi đưa ra giải pháp sau.

Ý em là chỉ muốn lấy duy nhất sheet Data, còn sheet Example thì không lấy phải không?

syhuynh09 · 12/7/14

Ðề: xóa các tên trùng nhau

mail của em là syhuynh0909@gmail.com

syhuynh09 · 14/7/14

Ðề: xóa các tên trùng nhau

be09 nói:
Bạn tải File lên (chỉ cần 30 dòng dữ liệu là đủ), mới biết cần trích lọc dữ liệu bắt đầu từ dòng nào cột nào mới làm được, còn nói khơi khơi như vầy thì bó tay, sẽ không ai giải quyết giúp được.

em mail lại cho anh rồi, anh check mail giúp em nhá

be09 · 14/7/14

Ðề: xóa các tên trùng nhau

syhuynh09 nói:
em mail lại cho anh rồi, anh check mail giúp em nhá

Do File không cùng cấu trúc nên không thể so sánh được, để anh suy nghĩ làm các nào đưa nó về cùng cấu trúc mới thực hiện được việc so sánh.

Nói chung các File của em cần gộp lại 1 sheet là đủ, để thuận tiện trong nvie65c tổng hợp, báo cáo và cần trích lọc cái gì thì thực hiện cái đó, chứ theo dõi nhiều File và nhiều sheet là cách làm không ổn, tổn hợp chậm và xử lý công việc mất rất nhiều thời gian.

Anh đã gửi mail vài File cho em tham khảo cách xây dựng 1 cơ sở dữ liệu để thực hiện tất tần tật các vấn đề như anh đã nêu trên.

Wind_Flower · 15/7/14

Ðề: xóa các tên trùng nhau

syhuynh09 nói:
Mình có danh sách tổng các nhân viên, và danh sách các nhân viên nhận tiền giờ có cách nào để mình lấy ra từ danh sách tổng đó các nhân viên chưa nhận tiền không

ko download data nên ko biết . File chắc qúy hoá nên hỏi tuổi thọ !!!

Giả sử tìm cột A trong Sheet1 và ko có trong cột B của Sheet2
Một cách đơn giản nhất, copy rồi paste vào Sheet1

=ISNA(MATCH(A2,Sheet2!$B$2:$B$900,0))

kéo xuống . Xong

Như vậy, nếu chỉ có trong Sheet1 --> True . Nếu có trong cả 2 Sheets là --> False

Cách khác là dùng công thức Duplicate để liệt kê những cái trùng . Dùng Countifs hoặc Sumproduct cho nhiều kiện hoặc Index(..Small(...Rows > Hoặc là tìm Unique trong 2 lists đó

Quá đơn giản qúa mà . Hơi đau VBA khi ko cần thiết

syhuynh09 · 15/7/14

Ðề: xóa các tên trùng nhau

bạn cho mình cái mail mình gửi file bạn giúp mình đc không...

syhuynh09 · 15/7/14

Ðề: xóa các tên trùng nhau

Wind_Flower nói:
ko download data nên ko biết . File chắc qúy hoá nên hỏi tuổi thọ !!!

Giả sử tìm cột A trong Sheet1 và ko có trong cột B của Sheet2
Một cách đơn giản nhất, copy rồi paste vào Sheet1

=ISNA(MATCH(A2,Sheet2!$B$2:$B$900,0))

kéo xuống . Xong

Như vậy, nếu chỉ có trong Sheet1 --> True . Nếu có trong cả 2 Sheets là --> False

Cách khác là dùng công thức Duplicate để liệt kê những cái trùng . Dùng Countifs hoặc Sumproduct cho nhiều kiện hoặc Index(..Small(...Rows > Hoặc là tìm Unique trong 2 lists đó

Quá đơn giản qúa mà . Hơi đau VBA khi ko cần thiết

bạn cho mình cái mail để mình gửi file ban xem giúp đc không

syhuynh09 · 15/7/14

Ðề: xóa các tên trùng nhau

be09 nói:
Do File không cùng cấu trúc nên không thể so sánh được, để anh suy nghĩ làm các nào đưa nó về cùng cấu trúc mới thực hiện được việc so sánh.

Nói chung các File của em cần gộp lại 1 sheet là đủ, để thuận tiện trong nvie65c tổng hợp, báo cáo và cần trích lọc cái gì thì thực hiện cái đó, chứ theo dõi nhiều File và nhiều sheet là cách làm không ổn, tổn hợp chậm và xử lý công việc mất rất nhiều thời gian.

Anh đã gửi mail vài File cho em tham khảo cách xây dựng 1 cơ sở dữ liệu để thực hiện tất tần tật các vấn đề như anh đã nêu trên.

em mail lại cho anh rồi ah

Wanderman · 20/7/14

Ðề: xóa các tên trùng nhau

Còn một cách nữa, tuy nhiên bạn phải chuyển cấu trúc dữ liệu 2 file tương tự nhau sau đó sử dụng công cụ Spreadsheet Compare - cái này chỉ có trong Office 2013 để so sánh.

Wind_Flower · 20/7/14

Ðề: xóa các tên trùng nhau

syhuynh09 nói:
bạn cho mình cái mail để mình gửi file ban xem giúp đc không

Giống hay đều , Gay / Les thì cũng hu ke

Worksheet function nhiều ko dùng ... mà ko piết VBA !!!!!!!!

Đại khái là xác định range từng sheets
Set Rng1 = Sheets("Sheet1").Range(Cells(2, "A"), Cells(Rows.Count, "A").End(xlUp))
hoặc
Set Rng1 =Sheets("Sheet1").Cells(Rows.Count, "A").End(xlUp).Row

Tùy theo mỗi người muốn viết kiểu lastrow của nó
Tương tự cho Set Rng2 =Sheets("Sheet2") blah blah

Giờ đi tìm cái giống nhau (a=b hoặc a<>b)
With Rng2
For Each x In Rng1
If (x <> Empty) Then
Set Mojo = .Find(What:=A.Value, After:=.Cells(1, 1), LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False)
If (Not Mojo Is Nothing) Then
x.Font.Bold = True ' delete gi` tùy ý
End If
End If
Next A
End With

hoặc là viết theo kiểu mẫu giáo

For Each x In Rng1
Old = Rng1.Value
For Each y In Rng2
If New = Rng2.Value Then
' đỏ xanh tím vàng hay delete
End If
Next
Next

Dùng Cells chỉ có 1 column , trong khi Range thì Area --> Range("A1:G100")

Có muôn vạn cách dùng . Chỉ Tình Phai (find) đâu cũng đến bến bờ chia ly

Cho Data mà >5000 rows thì nên dùng Variant . Code gọn, loop sẽ rất nhanh vì là array . Cài gì bound hay bánh bao gì đó

Ngộ mù tịt VBA à, chỉ blah blah blah ....ngộ lú á . Bói quẻ thôi, bói rùa

Ai piết chỉ cho ngộ nhé

xóa các tên trùng nhau

New Member

Member

New Member

Member

New Member

Member

New Member

Member

New Member

Member

New Member

New Member

Member

New Member

New Member

New Member

New Member

New Member

New Member

CẨM NANG KẾ TOÁN TRƯỞNG

KÊNH YOUTUBE DKT

SÁCH QUYẾT TOÁN THUẾ