Apply a maco to multiple active sheets

[jbsmart]

I have the below macro that I created on the second sheet of my workbook and I want to apply it to the rest of the remaining sheets. Can someone please help me?

Sub tier1sum()
'
' tier1sum Macro
' tier 1 sum
'
' Keyboard Shortcut: Ctrl+a
'
    ActiveCell.FormulaR1C1 = "=SUM(R[2]C:R[149]C)*25%"
    Range("H2").Select
End Sub