Option Explicit
Sub SumL17()
Dim lr As Long, lc As Long
lr = Range("A" & Rows.Count).End(xlUp).Row
lc = Cells(1, Columns.Count).End(xlToLeft).Column
Range("L17") = WorksheetFunction.Sum(Range(Cells(2, lc), Cells(lr, lc)))
End Sub
Option Explicit
Sub SumL17()
Dim lr As Long, lc As Long
lr = Range("A" & Rows.Count).End(xlUp).Row
lc = Cells(1, Columns.Count).End(xlToLeft).Column
Range("L17") = WorksheetFunction.Sum(Range(Cells(2, lc), Cells(lr, lc)))
End Sub
Option Explicit
Sub SumL17()
Dim lr As Long, lc As Long
lr = Range("A" & Rows.Count).End(xlUp).Row
lc = Cells(1, Columns.Count).End(xlToLeft).Column
Range("L17") = WorksheetFunction.Sum(Range(Cells(2, lc), Cells(lr, lc)))
End Sub