• 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


  • 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


Well-Known Member
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