Viết công thức tính tổng vào ô (1 người xem)

[xuanquy1188]

Mình có tạo 1 macro và nhập công thức tính tổng vào đó nó sẽ ra như thế này:

Mình tính tổng từ ô C2 đến ô C7 nhé:

Range("C8").Select
ActiveCell.FormulaR1C1 = "=SUM(R[-3]C[-4]:R[2]C[-4])"

Bây h sửa như thế nào để nhập vào trong ô với công thức chạy được từ ô C2 đến ô bất kỳ vậy các bạn?

Giả sử ô mình chạy từ C2 đến 1 ô có giá trị là "C" & a, a được nhập từ inputbox.

Mình làm như file đính kèm ấy.

Các bạn giúp mình với, thanks!

 

[Gió Đông]

Range("C8").Formula = "=SUM(C2:C" & a & ")"


hoặc thích đặt ở ô thuộc dòng a+1 cột C

Range("C" & (a+1) ).Formula = "=SUM(C2:C" & a & ")"

 

[xuanquy1188]

Thank bạn nhé, mình làm được rồi.