Guest User

Untitled

a guest
Jun 22nd, 2018
72
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.24 KB | None | 0 0
  1. lastcol = Cells(14, Columns.Count).End(xlToLeft).Column
  2. lastrow = Cells(Rows.Count, 11).End(xlUp).Row
  3. Cells(lastrow, "L").Formula = "=sum(L15:L" & lastrow - 1 & ")"
  4.  
  5. Cells((LR & "L"), Cells(LR, lastcol - 1)).Formula = "=sum(L15:L" & LR & ")"
Add Comment
Please, Sign In to add comment