Ghi công thức tổng cộng trong VBA

Liên hệ QC

Thanhhoai00

Thành viên chính thức
Tham gia
19/7/20
Bài viết
58
Được thích
13
Mình có đoạn code như sau !
Mỗi lần mình bấm nút Thêm trên userform thì dữ liệu từ userform sẽ ghi xuống Excel, thì ô tổng cộng tự nhiên hiện ra kết quả luôn, code của mình cũng chưa tính tổng được nữa, mình không biết sai chỗ nào ???
Mình muốn là - Ở cột tổng cộng cột F ghi xuống công thức tính tổng như vầy thì mình phải sửa code thế nào ạ !!!
= Lương + Tăng Ca + Bảo hiểm
= C2+D2+E2 ( hiện kết quả tổng cộng nhưng khi bấm vào thì thấy công thức tính như vầy)
Và như vậy mỗi lần mình thêm dữ liệu thì công thức sẽ tăng dần theo dữ liệu được thêm
ví dụ :
=C3+D3+E3
=C4+D4+E4
=C5+D5+E5
.............................
Các bạn giúp mình xíu nhé ! cảm ơn các bạn nhiều ạ !!!!
 

File đính kèm

  • hoi.png
    hoi.png
    10.7 KB · Đọc: 10
  • THEM.xlsm
    17.6 KB · Đọc: 6
Cách 1:
Range("F" & LastRow + 1).Formula = "=" & Range("=C" & LastRow + 1) & " + " & Range("D" & LastRow + 1) & " + " & Range("E" & LastRow + 1)
Kết quả:
1618412997681.png
Cách 2:
Range("F" & LastRow + 1).Formula = "=" & "C" & (LastRow + 1) & "+" & "D" & (LastRow + 1) & "+" & "E" & (LastRow + 1)
Kết quả
1618413161386.png

Cách 3:
Range("F" & LastRow + 1).FormulaR1C1 = "=Sum(RC[-3]:RC[-1])"

Kết quả
1618413304034.png
 
Upvote 0
Cách 1:
Range("F" & LastRow + 1).Formula = "=" & Range("=C" & LastRow + 1) & " + " & Range("D" & LastRow + 1) & " + " & Range("E" & LastRow + 1)
Kết quả:
View attachment 257088
Cách 2:
Range("F" & LastRow + 1).Formula = "=" & "C" & (LastRow + 1) & "+" & "D" & (LastRow + 1) & "+" & "E" & (LastRow + 1)
Kết quả
View attachment 257089

Cách 3:
Range("F" & LastRow + 1).FormulaR1C1 = "=Sum(RC[-3]:RC[-1])"

Kết quả
View attachment 257090
Cảm ơn mod nhiều lắm ạ !!!
 
Upvote 0
Web KT

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

Back
Top Bottom