If Column M is less than 15

T

Teddy

If a row in Column M is less than 15, I would like to put the letter “M†in
the same row of Column L. Below I can delete rows from Column M if they are
less than 15, but I am not sure how to insert the letter “M†in Column L,
without deleting the row. Might you be able to show me how?

Dim NativeplumRow As Long
Dim NorthernCatalpa As Long
NativeplumRow = ActiveSheet.Cells(Rows.Count, "M").End(xlUp).Row
For NorthernCatalpa = NativeplumRow To 2 Step -1
If (Cells(NorthernCatalpa, "M") < 15#) Then
Rows(NorthernCatalpa).EntireRow.Delete
Next NorthernCatalpa
 
T

Teddy

Thanks Mike! This is ideal.

Mike H said:
Hi,

Dim NativeplumRow As Long
Dim NorthernCatalpa As Long
NativeplumRow = ActiveSheet.Cells(Rows.Count, "M").End(xlUp).Row
For NorthernCatalpa = NativeplumRow To 2 Step -1
If (Cells(NorthernCatalpa, "M") < 15#) Then
Cells(NorthernCatalpa, "L") = "M"
End If
Next NorthernCatalpa

Mike
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top