Giúp em dùng VBA gộp nhiều sheet dữ liệu vào sheet tổng hợp định dạng sẵn

Liên hệ QC
Từ đầu có ai biết con chó ra sao đâu.
Tậu một cún về ngày đầu thì thấy nó đúng nhu cầu cần dọn dẹp ô uế con nít.
Ngày hôm sau mới biết chính mình phải dọn ô uế của nó.
Tuần lễ sau thì biết cần phải tắm rửa. Cả tháng thì bết phải bắt bọ chét...

Nếu biết từ đầu thì lên mâm cho rồi.
Mọi dữ liệu cần giúp mình đã làm file, viết rõ trong file rồi ( viết đầy đủ các yêu cầu mong muốn được giải quyết trong sheet code, duy chỉ có 1 vấn đề dính công thức là phát sinh thêm.
Bài đã được tự động gộp:

Từ đầu có ai biết con chó ra sao đâu.
Tậu một cún về ngày đầu thì thấy nó đúng nhu cầu cần dọn dẹp ô uế con nít.
Ngày hôm sau mới biết chính mình phải dọn ô uế của nó.
Tuần lễ sau thì biết cần phải tắm rửa. Cả tháng thì bết phải bắt bọ chét...

Nếu biết từ đầu thì lên mâm cho rồi.
 
Lần chỉnh sửa cuối:
Nếu vẫn còn quan tâm thì dùng thử xem. Code củ chuối thôi mà cũng chạy ra được kết quả đúng ý.(chưa thử lại kỹ)
Hãy thêm dữ liệu của các Sheet và vào Sheet TH2 và nhấn nút GỘP SHEET và kiểm tra kết quả.
Cảm ơn bạn rất nhiều - Quá hoàn hảo đối với mình rồi.
 
bản chất của sự việc là như này bạn ạ:
Ví dụ dữ liệu cột H của các sheet thành phần cần tổng hợp đang tham chiếu đến các ô nằm ngoài vùng lựa chọn tổng hợp =>
khi chạy code, ở sheet tổng hợp bế nguyên công thức ở sheet thành phần sang dẫn đến giá trị của nó bằng 0 vì nó tham chiếu đến vùng không có giá trị
Bạn xem giúp mình với
Bài đã được tự động gộp:


Được rồi bạn nhé
Cảm ơn bạn nhiều !

Bạn thêm đoạn này vào dưới dòng có chữ next nhé.

Mã:
 sd.Range("A2:G" & lrd).Copy
 sd.Range("A2").PasteSpecial xlPasteValues
 sd.Range("A1").Select
Chào bạn, đoạn code thêm vào này, lúc sáng mình làm xong xem kết quả chưa kỹ, kết quả còn bị lỗi, mình gửi lại file chi tiết bạn xem giúp mình được không
 
Bạn tả xem lỗi như thế nào để còn tìm nguyên nhân, mình cũng chưa thấy file.
Khi thêm đoạn code vào, bấm tổng hợp vẫn chạy ra kq, nhưng ko chính xác
- luôn có 1 sheet cuối cùng vẫn tổng hợp ở dang bế nguyên công thức sang
- ở các sheet trước sheet cuối cùng nói ở trên, tuy đã bỏ đi công thức, nhưng giá trị lại bằng 0, khác với sheet thành phần
Bài đã được tự động gộp:

Bạn tả xem lỗi như thế nào để còn tìm nguyên nhân, mình cũng chưa thấy file.
mình gửi lại file, trong file có một số ý , nếu được bạn có thể điều chỉnh giúp mình với
 

File đính kèm

Khi thêm đoạn code vào, bấm tổng hợp vẫn chạy ra kq, nhưng ko chính xác
- luôn có 1 sheet cuối cùng vẫn tổng hợp ở dang bế nguyên công thức sang
- ở các sheet trước sheet cuối cùng nói ở trên, tuy đã bỏ đi công thức, nhưng giá trị lại bằng 0, khác với sheet thành phần
Không có file gốc thì mình không gì để thử, và mình không có thời gian để tạo dữ liệu giống file gốc của bạn.
 
Không có file gốc thì mình không gì để thử, và mình không có thời gian để tạo dữ liệu giống file gốc của bạn.
Bạn cần xem lại là từ bài #3 nó may ra còn liên hệ đến vấn đề chính của thớt.
Sau một hồi thêm thắt thì nó đi xa. Rõ ràng là:
1. người hỏi chỉ có ý tưởng trong câu hỏi của mình và mò từng bước, HOẶC
2. nếu như người hỏi đã biết trước như đang biện luận thì bạn được dẫn đường theo kiểu nhử mòi chuột - từng mẩu bánh một.
 
Cảm ơn mọi người đã bớt thời gian giải quyết vấn đề giúp mình.
Xin phép không nhận sự giúp đỡ nữa.
@VetMini trong file gửi đầu tiên, mình đã viết rất rõ các vướng mắc mình cần giúp , ở trong sheet CODE. Tuy nhiên những vấn đề đó ko được giải quyết nên mình mới hỏi. Sau từ hoặc là ở trong bụng ông mà ra thôi.
 
Cảm ơn mọi người đã bớt thời gian giải quyết vấn đề giúp mình.
Xin phép không nhận sự giúp đỡ nữa.
...
Mang thân đi hỏi bài mà cũng bày đặt tự ái hảo.
Cần phân biệt tự trọng và tự ái. Cùng khởi đầu bằng "tự" nhưng một cái tiến đến tự tồn và cái kia tiến đến tự diêtrj.
 
Tôi đi hỏi, rất c
Mang thân đi hỏi bài mà cũng bày đặt tự ái hảo.
Cần phân biệt tự trọng và tự ái. Cùng khởi đầu bằng "tự" nhưng một cái tiến đến tự tồn và cái kia ti

Mang thân đi hỏi bài mà cũng bày đặt tự ái hảo.
Cần phân biệt tự trọng và tự ái. Cùng khởi đầu bằng "tự" nhưng một cái tiến đến tự tồn và cái kia tiến đến tự diêtrj.
Tôi đi hỏi. Rất cầu thị, rất biết ơn.
Ông ko giúp thì mắc gì ngứa mồm, ngứa tay gõ phím. Hay đến tháng nên khó ở
 
Tôi đi hỏi, rất c



Tôi đi hỏi. Rất cầu thị, rất biết ơn.
Ông ko giúp thì mắc gì ngứa mồm, ngứa tay gõ phím. Hay đến tháng nên khó ở
Tôi chỉ mượn bạn để làm răn các thành viên khác trong diễn đàn.
Bây giờ chủ đích của tôi đã xong. Bạn hết công dụng rồi. Tôi thôi không mượn nữa. Cám ơn nhé.
 
Web KT

Bài viết mới nhất

Back
Top Bottom