Label captured when Macro run

Topic

New Reply

When I run the following macro, it captures the column label in Row 2 even though it is supposed to Step to 3.
Any ideas why or what I can do to fix it?

Sub LimitData
Dim k As Long, l As Long

k = Range(“I3000”).End(xlUp).Row

For l = k To 3 Step -1
If IsEmpty(Range(“M” & l)) Then
Range(“M” & l).Value =0
End If
Next l
End Sub

Reply | Quote

Replies

What exactly do you mean by “it captures the column label in Row 2”?

Reply | Quote

I finally figured it out. That if a column has no data in it the code will keep stepping -1
I need to add
If l < 3, then l =3

code …
End If
Is there a better way to code it?

Reply | Quote

That shouldn’t be necessary; the original code should stop at row 3.

Reply | Quote