em cần tạo 1 dòng tổng cộng bên dưới sổ mỗi lần chèn thêm dòng vào sẽ được chèn vào dòng tổng cộng bên dười
Chào bạn phương pháp đơn giản nhất là bạn xoá toàn bộ dữ liệu đi rồi sau khi thêm dòng tổng cộng bạn dùng code format lại định dạng và thêm những thứ cần vào bên trong.
e không làm được thầy có thể nói rõ hơn được không ạ
thầy xem file này giúp e đc k (sheet so)
Chào bạn bạn cho gitiho xin quyền truy cập nhé.
Chào bạn phần này gitiho sẽ làm 1 video để thêm dòng tổng cộng nhé. phần này viết nó hơi lâu
ok. vậy nhờ thầy ạ, khi nào có e cám ơn thầy ạ
Chào bạn gitiho sẽ cố gắng quay trong thời gian sớm nhất.
thầy ơi nd hôm trước e hoi thấy có kết quả chưa ạ. có thể chia sẽ cho e xin đoaạn code đó dc k ạ
Để tự động thêm dòng tổng cộng ở bên dưới bạn có thể làm như sau (giả sử chữ tổng cộng đặt tại cột B, vùng tính tổng từ dòng 3 tới dòng cuối):
Sub DongTongCong()
Dim DongCuoi As Long
DongCuoi = Sheet1.Range("B" & Rows.Count).End(xlUp).Row
Range("B" & DongCuoi + 1).Value = Range("Z1") 'tại ô Z1 viết chữ Tổng cộng là tiếng việt có dấu
Range("C" & DongCuoi + 1).formula = "=SUM(C3:C" & DongCuoi & ")" 'Công thức tính tổng cho cột C
End Sub
ok cam on thay
Thường các câu hỏi về code bạn có thể gửi kèm file hoặc hình ảnh mô tả vấn đề sẽ rõ ràng hơn, như thế việc hướng dẫn cũng sẽ nhanh và chính xác hơn.
Chúc bạn học tốt cùng Gitiho!