Apply round formula to range of cells + autofill

[fruela]

Hi all,

On the table below, the formula for column B is

=ROUND(T2/5;0)*5

I want to automate in vba. I have used the below in other cases, can I adapt with the formula above instead of "=O2/S2" ?

Sub firstMonth()
    Range("T2").Formula = "=O2/S2"
    Range("T2").AutoFill Range("T2:T" & Range("A" & Rows.Count).End(xlUp).Row)
End Sub

Thank you! Cheers

First Month Value	First Month Value (round)
283,3333333​	285,00​
250​	250,00​
283,3333333​	285,00​

 

[Fluff]

If you want to round to the nearest multiple of 5

Range("T2:T" & Range("A" & Rows.Count).End(xlUp).Row).Formula="=MROUND(O2/S2,5)"

 

[fruela]

Works perfectly! Thank you Fluff!

 

[Fluff]

You're welcome & thanks for the feedback.