Hướng dẫn cách viết code thêm dòng tổng cộng vào cuối báo cáo Excel VBA

Việc tự động hóa những báo cáo giải trình trong Excel giúp tất cả chúng ta hoàn toàn có thể làm báo cáo giải trình nhanh hơn. Tuy nhiên làm thế nào để bảo vệ những báo cáo giải trình tự động hóa được trình diễn đúng nghệ thuật và thẩm mỹ ? Cụ thể là sau mỗi lần update báo cáo giải trình, hoàn toàn có thể nội dung trong báo cáo giải trình biến hóa dẫn tới vị trí dòng tổng số cũng đổi khác theo. Trong bài viết này, tất cả chúng ta cùng tìm hiểu và khám phá cách viết code thêm dòng tổng số vào cuối báo cáo giải trình nhé .

Tự động cập nhật kết quả báo cáo với Advanced Filter và VBA

Đây là nội dung quan trọng nhất giúp tất cả chúng ta có được phần nội dung của báo cáo giải trình. Advanced Filter có tính năng vừa lọc tài liệu theo điều kiện kèm theo, đồng thời trích xuất tác dụng lọc được sang bảng tính khác ( hoàn toàn có thể tại Sheet khác ) .

Tải tài liệu mẫu để thực hành: http://bit.ly/2Wr6o4z

Ví dụ tất cả chúng ta có bảng tài liệu tại Sheet ChiPhi

Từ bảng tài liệu đó, tất cả chúng ta sẽ lọc và trích xuất tác dụng sang Sheet ChiTiet với dạng báo cáo giải trình như sau :

Khi đó ta có những thành phần để sử dụng Advanced Filter như sau :

  • List Range: Vùng bảo dữ liệu tại Sheet ChiPhi (bao gồm cả dòng tiêu đề)
  • Criteria Range: Vùng điều kiện. Vùng này chúng ta phải thay đổi cấu trúc để phù hợp với tiêu chí sử dụng của Advanced Filter: Vùng I6:K7

  • Copy to: Vùng kết quả cần trích xuất, là vùng A6:F6

 

Kết quả thu được là các nội dung chi tiết tương ứng theo điều kiện trích lọc, nhưng không có dòng tổng cộng

Để tự động hóa thao tác Advanced Filter, tất cả chúng ta hoàn toàn có thể Record Macro cho thao tác sử dụng Advanced Filter. Các bạn hoàn toàn có thể tìm hiểu thêm thêm tại bài viết :
Hướng dẫn cách sử dụng công dụng Advanced Filter trong VBA

Thêm dòng tổng cộng vào cuối báo cáo bằng code VBA

Trước khi thêm dòng tổng số vào báo cáo giải trình, tất cả chúng ta cần chú ý quan tâm 1 số điều :

  • Nếu bảng dữ liệu gốc có định dạng thì khi trích xuất dữ liệu sang bảng khác, Advanced Filter sẽ mang theo định dạng đó.
  • Dòng tổng cộng luôn nằm ở cuối bảng báo cáo.

Vì vậy quá trình thực thi sẽ gồm có những bước :

  • Bước 1: Xóa hết dữ liệu và định dạng trong phần nội dung báo cáo trước đó
  • Bước 2: Thực hiện cập nhật báo cáo với Advanced Filter
  • Bước 3: Tìm dòng cuối của báo cáo
  • Bước 4: Thêm nội dung tổng cộng vào dòng trống bên dưới dòng cuối của báo cáo
  • Bước 5: Định dạng cho dòng tổng cộng

Dưới đây là đoạn Code VBA mẫu, các bạn có thể copy vào file để chạy thử (bấm nút View Raw bên dưới khung code rồi copy đoạn code):

View the code on Gist.Tải file hiệu quả tại địa chỉ : http://bit.ly/2F2Q3gB
Chúc những bạn ứng dụng thành công xuất sắc !

Source: https://vvc.vn
Category : Vì Cộng Đồng

BẠN CÓ THỂ QUAN TÂM

Alternate Text Gọi ngay