Nhờ giúp đỡ file làm báo cáo

[vanthinh3101]

Kính gửi tất cả mọi người,
Hàng tháng tôi phải làm 1 báo cáo kết quả kinh doanh cho cả phòng.
Để tiết kiệm thời gian tôi đã sử dụng Record Macro để lưu lại các bước làm và tạo thành 1 nút lệnh cho chạy báo cáo.
Tuy nhiên, do không có kiến thức tốt về VBA nên file báo cáo của tôi gặp phải vấn đề sau:
- File báo cáo help 1 là file gốc, tôi đã xử lý được và lưu lại
- File báo cáo help 2 là file báo cáo tôi đưa dữ liệu mới vào xử lý
Fiel báo cáo help 2 không thể chạy ra kết quả chính xác vì số dòng dữ liệu đã tăng lên trong khi mã code không tự động cập nhật được.
Tôi gửi cả 2 file lên đây, hi vọng mọi người có thể đóng góp ý kiến cho tôi sử lại file báo cáo này.
Tôi xin cảm ơn.

 

[khanhhero]

Đây bác xem thử nhé, em sửa lại chút chút trong ghi macro thôi, còn sửa lại cho gọn thì em cũng ko có nhiều thời gian, cái chính là đáp ứng được nhu cầu của bác

 

[vanthinh3101]

Đây bác xem thử nhé, em sửa lại chút chút trong ghi macro thôi, còn sửa lại cho gọn thì em cũng ko có nhiều thời gian, cái chính là đáp ứng được nhu cầu của bác

Cảm ơn bạn Khanhhero, mình thấy đã chạy được kết quả đúng rồi.
Mình sẽ thử lại với dữ liệu nhiều dòng hơn nữa xem thế nào.
Bạn có thể nghiên cứu thêm xem có cách nào để loại bỏ phần blank được ko?

 

[khanhhero]

Cảm ơn bạn Khanhhero, mình thấy đã chạy được kết quả đúng rồi.

Mình sẽ thử lại với dữ liệu nhiều dòng hơn nữa xem thế nào.
Bạn có thể nghiên cứu thêm xem có cách nào để loại bỏ phần blank được ko?

Blank của cái j bác?

 

[Ba Tê]

Kính gửi tất cả mọi người,
Hàng tháng tôi phải làm 1 báo cáo kết quả kinh doanh cho cả phòng.
Để tiết kiệm thời gian tôi đã sử dụng Record Macro để lưu lại các bước làm và tạo thành 1 nút lệnh cho chạy báo cáo.
Tuy nhiên, do không có kiến thức tốt về VBA nên file báo cáo của tôi gặp phải vấn đề sau:
- File báo cáo help 1 là file gốc, tôi đã xử lý được và lưu lại
- File báo cáo help 2 là file báo cáo tôi đưa dữ liệu mới vào xử lý
Fiel báo cáo help 2 không thể chạy ra kết quả chính xác vì số dòng dữ liệu đã tăng lên trong khi mã code không tự động cập nhật được.
Tôi gửi cả 2 file lên đây, hi vọng mọi người có thể đóng góp ý kiến cho tôi sử lại file báo cáo này.
Tôi xin cảm ơn.

Không biết bạn xử lý thế nào.
Tôi không "đụng" đến sheet "Data", kết quả ra khác với của bạn.
Tổng dư nợ của Data ban đầu (Cột S khi chưa chạy code) là 1.370.743.847.908- Kết quả tổng hợp của bạn lại là 1.293.066.142.646

 

[vanthinh3101]

Blank của cái j bác?​

Ý của mình là trong bảng pivot table ở Sheet Pivot có cả phần tổng hợp Blank và thực tế không có số liệu gì?
Vậy bạn có cách để chỉ pivot phần có số liệu hay không?​

 

[vanthinh3101]

Không biết bạn xử lý thế nào.
Tôi không "đụng" đến sheet "Data", kết quả ra khác với của bạn.
Tổng dư nợ của Data ban đầu (Cột S khi chưa chạy code) là 1.370.743.847.908- Kết quả tổng hợp của bạn lại là 1.293.066.142.646

Cám ơn bác đã giúp đỡ.
File của em bị lỗi khi tăng số dòng dữ liệu ở sheet data, code VBA không cập nhật được.
Em muốn tạo 1 file báo cáo với sheet Mã sản phẩm là cố định, khi nào có phát sinh sản phẩm mới thì cập nhật thêm vào. Sheet data là dữ liệu chiết xuất từ phần mềm core.
em sẽ thử file của bác với dữ liệu lớn hơn xem thế nào.
Em ko giỏi viết code VBA nên hay sử dụng Record Macro và lưu lại, chỉnh sửa để được như ý. Tất nhiên là sẽ bị hạn chế đi nhiều.

 

[vanthinh3101]

Không biết bạn xử lý thế nào.
Tôi không "đụng" đến sheet "Data", kết quả ra khác với của bạn.
Tổng dư nợ của Data ban đầu (Cột S khi chưa chạy code) là 1.370.743.847.908- Kết quả tổng hợp của bạn lại là 1.293.066.142.646

Em đã kiểm tra lại rồi bác ah.
File của bác cho ra kết quả tổng dư nợ chính xác, em cũng đã thử cập nhật mã sản phẩm mới thì khi chạy code cũng cập nhật được.
Chỉ có 1 điều là code của bác không loại trừ các trường hợp Khách hàng trùng nhau (1 KH vay 1 món có thể giải ngân nhiều lần nhưng chỉ được tính là 1 KH). Kết quả pivot cho ra kết quả 1023 là chính xác, code của bác cho ra kết quả 1715.
Bác xem lại cho em nhé!
Ngoài ra, bác có thể tối ưu hóa code VBA ở file của em được không ah. Code của em không tự động mở rộng vùng dữ liệu được nên khi sheet data có thêm dòng dữ liệu sẽ không cập nhật được và sẽ cho kết quả không chính xác.

 

[Ba Tê]

Em đã kiểm tra lại rồi bác ah.
File của bác cho ra kết quả tổng dư nợ chính xác, em cũng đã thử cập nhật mã sản phẩm mới thì khi chạy code cũng cập nhật được.
Chỉ có 1 điều là code của bác không loại trừ các trường hợp Khách hàng trùng nhau (1 KH vay 1 món có thể giải ngân nhiều lần nhưng chỉ được tính là 1 KH). Kết quả pivot cho ra kết quả 1023 là chính xác, code của bác cho ra kết quả 1715.
Bác xem lại cho em nhé!
Ngoài ra, bác có thể tối ưu hóa code VBA ở file của em được không ah. Code của em không tự động mở rộng vùng dữ liệu được nên khi sheet data có thêm dòng dữ liệu sẽ không cập nhật được và sẽ cho kết quả không chính xác.

- Tôi không đọc hiểu được code của bạn nên không thể "tối ưu" nó được.
- Vẫn không "đụng" vào code của bạn, lấy dữ liệu "Data" nguyên xi.
- Tiếp theo cách làm của tôi:
+ Số dư nợ đúng ? Không tính nữa.
+ Đếm số KH sai ? Vì không giải thích nên không hiểu, đếm lại.

 

[khanhhero]

Ý của mình là trong bảng pivot table ở Sheet Pivot có cả phần tổng hợp Blank và thực tế không có số liệu gì?
Vậy bạn có cách để chỉ pivot phần có số liệu hay không?

Em sửa lại rồi nhé anh, h a chỉ cần copy số liệu vào file DATA cho đúng template như ban đầu a record macro, sau đó bấm nút run thôi, các sheet kia tự xóa và cập nhật lại dữ liệu nhé anh.

 

[vanthinh3101]

- Tôi không đọc hiểu được code của bạn nên không thể "tối ưu" nó được.
- Vẫn không "đụng" vào code của bạn, lấy dữ liệu "Data" nguyên xi.
- Tiếp theo cách làm của tôi:
+ Số dư nợ đúng ? Không tính nữa.
+ Đếm số KH sai ? Vì không giải thích nên không hiểu, đếm lại.

Em cám ơn bác nhiều.

 

[vanthinh3101]

Em sửa lại rồi nhé anh, h a chỉ cần copy số liệu vào file DATA cho đúng template như ban đầu a record macro, sau đó bấm nút run thôi, các sheet kia tự xóa và cập nhật lại dữ liệu nhé anh.

Mình cám ơn bạn đã nhiệt tình giúp đỡ nhé!