Share via

VBA for simple sum

Anonymous
2012-05-22T09:14:41+00:00

Dear Expert,

I need to go to end of the row in Column I, one cell next, then sum from i3 to end of the row ...

Using recorder ... cannot make it.

Hope Expert can help.

Microsoft 365 and Office | Excel | For home | Windows

Locked Question. This question was migrated from the Microsoft Support Community. You can vote on whether it's helpful, but you can't add comments or replies or follow the question.

0 comments

Answer accepted by question author

Anonymous
2012-05-22T09:23:30+00:00

Hi,

Try this

Dim LastRow As Long

LastRow = Cells(Cells.Rows.Count, "I").End(xlUp).Row

Range("I" & LastRow + 1) = WorksheetFunction.Sum(Range("I3:I" & LastRow))

Or to put the formula in that cell you can use

Range("I" & LastRow + 1).Formula = "=Sum(I3:I" & LastRow & ")"

Was this answer helpful?

0 comments

1 additional answer

Sort by: Most helpful
Most helpful Newest Oldest
  1. Anonymous
    2012-05-22T09:44:19+00:00

    Thanks Genius. Thanks so much

    Was this answer helpful?

    0 comments