Em có file quản lý tàu mà nhận được từ nhiều nơi, nhờ các bác giúp em cách gộp hai hàng có giá trị giống nhau tại hai cột chủ tàu và số đăng ký lại một mà không mất dữ liệu được không ah
Đang hóng Oanh Thơ chạy code bài này, thế ra bạn ấy cũng đang hóngHình như file này của bạn là do 2 người nhập liệu, mỗi người nhập những cột khác nhau? Sau đó bạn copy dữ liệu của 2 người vào 1 bảng?
Nếu vậy bạn giữ nguyên 1 bảng, còn các cột còn trống bạn sử dụng hàm vlookup theo từ khóa như sô đăng ký hoặc chủ tàu từ bảng 1 đến bảng 2 là cũng được mà.
-------
OT cũng muốn hóng dạng bài này bằng code![]()
OT thấy dạng bài này cũng thực tế, OT đã xử lý kiểu đã nêu còn lỡ gộp vào rồi thì lại tách ra rồi gộp lại thôi ạ. =)Đang hóng Oanh Thơ chạy code bài này, thế ra bạn ấy cũng đang hóng
Giờ 2 bảng lỡ nhập vào 1 rồi, công thức thì sao nhỉ
Dạ đúng rồi, em mù mờ nên không biết làm sao ghép hai giá trị lại một bằng cách nhanh nhất chứ ngồi ghép thủ công lâu quá, nếu được nhờ chị làm cho luôn cùng àHình như file này của bạn là do 2 người nhập liệu, mỗi người nhập những cột khác nhau? Sau đó bạn copy dữ liệu của 2 người vào 1 bảng?
Nếu vậy bạn giữ nguyên 1 bảng, còn các cột còn trống bạn sử dụng hàm vlookup theo từ khóa như sô đăng ký hoặc chủ tàu từ bảng 1 đến bảng 2 là cũng được mà.
-------
OT cũng muốn hóng dạng bài này bằng code![]()
Bạn thử gửi 2 bảng số liệu mà bạn chưa gộp chung vào 1 bảng lên xem thế nào ạDạ đúng rồi anh, em mù mờ nên không biết làm sao ghép hai giá trị lại một bằng cách nhanh nhất chứ ngồi ghép thủ công lâu quss
Public Sub Test()
Dim lr As Long, i As Long, j As Long
Dim sArr, dArr
Dim c As Long
Dim k As Long
With Sheet1
lr = .Range("A" & Rows.Count).End(xlUp).Row
.Range("A4:S" & lr).Sort .Range("B4")
sArr = .Range("A4:S" & lr + 1).Value
End With
lr = UBound(sArr, 1)
c = UBound(sArr, 2)
i = 1
ReDim dArr(1 To lr, 1 To c)
Do While i < lr - 1
k = k + 1
dArr(k, 1) = k
If sArr(i, 2) <> sArr(i + 1, 2) Then
For j = 2 To c
dArr(k, j) = sArr(i, j)
Next
i = i + 1
Else
For j = 2 To c
If sArr(i, j) <> "" Then
dArr(k, j) = sArr(i, j)
Else
dArr(k, j) = sArr(i + 1, j)
End If
Next
i = i + 2
End If
Loop
Sheet2.Range("A5").Resize(k, c) = dArr
End Sub
Bạn gì ơi, ... lợi hại quá!Thử:
Mã:Public Sub Test() Dim lr As Long, i As Long, j As Long Dim sArr, dArr Dim c As Long Dim k As Long With Sheet1 lr = .Range("A" & Rows.Count).End(xlUp).Row .Range("A4:S" & lr).Sort .Range("B4") sArr = .Range("A4:S" & lr + 1).Value End With lr = UBound(sArr, 1) c = UBound(sArr, 2) i = 1 ReDim dArr(1 To lr, 1 To c) Do While i < lr - 1 k = k + 1 dArr(k, 1) = k If sArr(i, 2) <> sArr(i + 1, 2) Then For j = 2 To c dArr(k, j) = sArr(i, j) Next i = i + 1 Else For j = 2 To c If sArr(i, j) <> "" Then dArr(k, j) = sArr(i, j) Else dArr(k, j) = sArr(i + 1, j) End If Next i = i + 2 End If Loop Sheet2.Range("A5").Resize(k, c) = dArr End Sub
Dạ đây chị, em nhận dữ liệu từ hai nơi mà mục đích là làm sao gộp lại các giá trị giống nhau, đảm bảo không bị mất phần nào, còn phần nào trùng thì bỏ đi. Em còn nhiều file dạng này để tổng hợp nữa, nếu làm được thì hay quáBạn thử gửi 2 bảng số liệu mà bạn chưa gộp chung vào 1 bảng lên xem thế nào ạ
Không ai giúp thì tôi làm thủ công cũng nhanh (chỉ khoảng 1 phút), bạn kiểm tra xem có đúng không.Em có file quản lý tàu mà nhận được từ nhiều nơi, nhờ các bác giúp em cách gộp hai hàng có giá trị giống nhau tại hai cột chủ tàu và số đăng ký lại một mà không mất dữ liệu được không ah
Dạ đúng rồi anh, mà anh làm thủ công sao nhanh vậy anh, cảm ơn anh nhaKhông ai giúp thì tôi làm thủ công, bạn kiểm tra xem có đúng không.
Có bao giờ người nhập liệu hơn 2 Số đăng ký không? Tôi hỏi để biết quy luật.Dạ đúng rồi anh, mà anh làm thủ công sao nhanh vậy anh, cảm ơn anh nha
Là sao anh, em chưa hiểu, ý anh là nhập trùng hai số đăng ký ah, còn số đăng ký thì khác nhau anh àCó bao giờ người nhập liệu hơn 2 Số đăng ký không? Tôi hỏi để biết quy luật.
Có phải Bác be09 thao tác,Không ai giúp thì tôi làm thủ công cũng nhanh (chỉ khoảng 1 phút), bạn kiểm tra xem có đúng không.
Dạ đây chị, em nhận dữ liệu từ hai nơi mà mục đích là làm sao gộp lại các giá trị giống nhau, đảm bảo không bị mất phần nào, còn phần nào trùng thì bỏ đi. Em còn nhiều file dạng này để tổng hợp nữa, nếu làm được thì hay quá
Híc, không biết phải hướng dẫn bạn thế nào nhỉ, hình như bạn cũng không biết sử dụng code và cách OT hướng dẫn bạn ở bài 2 sử dụng hàm Vlookup (cách làm thủ công) bạn cũng không biết nhỉ.
Đại loại nếu là OT làm thì OT sẽ copy cột mã số đăng ký và họ tên của file 1 và file 2 sang một file thứ 3.
Sau đóa xóa các dữ liệu trùng nhau của cả 2 cột này.
Tiếp đến là tạo đầy đủ các cột dữ liệu cần nhập vào file 3 rồi dùng hàm if kết hợp với vlookup cho file 3(nếu không tìm thấy ở file 1 thì tìm ở file 2) đại loại là vậy.
Cách này thủ công lắm bạn chờ Bác Bé xem Bác ấy có chiêu gì thủ công nhanh vậy.
Hoặc nếu bạn biết sử code thì bạn thử sử dụng code ở bài 7 xem nhưng để dùng code ở bài 7 thì bạn cần tạo thêm sheet nữa rồi mới chạy code được.
Chúc bạn thành công.Dạ đúng rồi, nói thật với chị chứ em search cũng biết các dùng code nhưng cũng mù mờ lắm, mà tại em có cả đống file như vậy để tổng hợp lại nên đang đau đầu,vì chuyên môn em lamfvieecj khác chứ excell này cũng ít khi dùng, cam rơn chị nha
Tôi đang trên đường đi Nha Trang rồi, bạn chờ thành viên khác giúp vậy.Hi hi dạ cảm ợn anh, em nhận dữ liệu từ hai người nhập nên chỉ tối đa là hai số thôi anh à. Anh chỉ cho em cách trộn được không, em còn nhiều file như vậy lắm, tại em dân nghiệp dư nên excell cũng ít khi sử dụng do đó cũng không rành lắm
Bài đã được tự động gộp:
Bài đã được tự động gộp:
Bác be09 ơi hình như file của bác gộp lại bị mất dự liệu ở vùng file máy chính 2 bác ah
File lúc vầy, lúc khác nên không làm kiểu đó sẽ gán vào chỗ không cần dẫn đến kết quả sẽ sai.Có phải Bác be09 thao tác,
1.Bôi đen toàn bộ vùng dữ liệu
2.Sort theo tên hoặc số đăng ký
3.Ctlr+G chọn Blank
4.Nhập dấu = với ô phía trên rồi clrl+Enter
5. Xóa trùng
Bác nhỉ ?
Code chậm! nhưng có thể giải quyết được vấn đề của bạn. (nếu trùng thì chỉ lấy 1 dòng, nếu không trùng thì gộp 2 dòng lại 1.)Em có file quản lý tàu mà nhận được từ nhiều nơi, nhờ các bác giúp em cách gộp hai hàng có giá trị giống nhau tại hai cột chủ tàu và số đăng ký lại một mà không mất dữ liệu được không ah
DẠ CẢM ƠN BÁC NHIỀU TIỆN THỂ NHỜ BÁC CODE CHO EM FILE NÀY ĐƯỢC KHÔNG ÀCode chậm! nhưng có thể giải quyết được vấn đề của bạn. (nếu trùng thì chỉ lấy 1 dòng, nếu không trùng thì gộp 2 dòng lại 1.)