VBA Code to replace "0"s withing Column "I" to value in column "M"

[pigeondr]

I am new to VBA and trying to simplify a repetitive task with a loop. I have searched multiple forums and can not find a code that will work just for one column, any help is much appreciated!

I have header row. The data starts in row 3. I am tryin to search column "I" and if value is zero/ "0", return value in same value in column "M".

 

[pigeondr]

Just to clarify, the value would be in the same row. ie 0 in I232 would be the value in M232.

 

[DanteAmor]

Try this

Sub Change_0()
    For Each c In Range("I3", Range("I" & Rows.Count).End(xlUp))
        If c.Value = 0 Then c.Value = c.Offset(0, 4).Value
    Next
End Sub

 

[pigeondr]

Thanks so much, worked perfectly!

 

[DanteAmor]

Thanks so much, worked perfectly!

I'm glad to help you. Thanks for the feedback.