https://ibb.co/gqQ2Ow
Please see my captured result of the code I came up, I want the results to be just the second encircled one. I don't need to add epoxy if there is already a word after trimform which is like the first encirled one. Pls help me. TIA!
Below is my code i came up pls help!
Sub try()
Dim c As Range
For Each c In Range("D2:D429")
If c.Value = "TRIMFORM" Then
c.Offset(1, 0).EntireRow.Insert
c.Offset(1, 0).Value = "Epoxy"
End If
Next c
End Sub
Please see my captured result of the code I came up, I want the results to be just the second encircled one. I don't need to add epoxy if there is already a word after trimform which is like the first encirled one. Pls help me. TIA!
Below is my code i came up pls help!
Sub try()
Dim c As Range
For Each c In Range("D2:D429")
If c.Value = "TRIMFORM" Then
c.Offset(1, 0).EntireRow.Insert
c.Offset(1, 0).Value = "Epoxy"
End If
Next c
End Sub