• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

Sum multiple worksheet columns having uncommon numbers data

p45cal

Well-Known Member
Code:
Sub blah()
For Each sht In ThisWorkbook.Worksheets
  With sht
    Set sumCell = .Cells(.Rows.Count, "F").End(xlUp)
    sumCell.Offset(1).Value = Application.Sum(Range(.Cells(5, "F"), sumCell))
  End With
Next sht
End Sub
 
Top