Coba ganti Code: Cells(Rows.Count, 1).End(xlUp).Offset(1) = "=SUM(R[-" Cells(Rows.Count, 1).End(xlUp).Offset(1) "]C:R[-1]C)"
dengan Cells(Rows.Count, 1).End(xlUp).Offset(1) = "=SUM(R1C:R[-1]C)" Salam, HK On Monday, 2 June 2014, 14:29, "sofyan mujit [email protected] [belajar-excel]" <[email protected]> wrote: Dear Master excel Mohon bantuan utk koreksi kode berikut ( file terlampir ) kode vba Cells(Rows.Count, 1).End(xlUp).Offset(1) = "=SUM(R[-" Cells(Rows.Count, 1).End(xlUp).Offset(1) "]C:R[-1]C)" koreksi, maksudnya : result DATA A =SUM(A4:A5) maunya sih=SUM(A2:A4) result DATA B =SUM(A5:A6) maunya sih=SUM(A2:A6) result DATA C =SUM(A6:A7) maunya sih=SUM(A2:A7) Mohon di bantu koreksi code nya ....
