Dear master....
mohon dapat dibantu dikoreksi dimana script terlampir saya mau menggunakan fungsi sum di macro, dimana yang saya inginkan membuat sum pada posisi cursor activecell yang di sum adalah range row - 1 dari active cell sampai row sebelum formula sum pada row sebelumnya. sedangkan column nya sama dengan posisi activecell.
Sub summ()
Dim x As Variant
Dim lrow As Long, valuesum As Variant
Worksheets("Sheet1").Activate
x = ActiveCell.Address
With ActiveCell
valuesum = "=SUM(" & .Cells(x.Row - 1, x.Column) & ":" & .Cells(x.Row - 10, x.Column) & ")" ' kemungkinan posisi salahnya
.Formula = valuesum
End With
End Sub
terima kasih