If Column M is less than 15

  • Thread starter Thread starter Teddy
  • Start date Start date
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
 
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
 
Back
Top