If Column T contains then

J

JHopper

Dim Defragglerow As Long
Dim RockroadRow As Long

Defragglerow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row

For RockroadRow = 1 To Defragglerow
With Cells(RockroadRow, "T")
If .Text Like "TACO*" And.Offset(, 52).Text Like "*Blank*" Then
Cells(RockroadRow, "F") = "SOFT TACO"
End If
End With
Next RockroadRow

End Sub

If any row in Column T contains TACO anywhere and that same row in Column BA
is blank I want to change the contents in Column F to “SOFT TACOâ€. I entered
the code I have so far above. Can you help me with the rest?
 
J

joel

For RockroadRow = 1 To Defragglerow
If Cells(RockroadRow, "T").Text Like "TACO*" And _
Cells(RockroadRow, "BT").Text Like "*Blank*" Then

Cells(RockroadRow, "F") = "SOFT TACO"
End If
Next RockroadRow
 

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

Similar Threads

If Column T contains then 1
Search other sheets for numbers & color them 10
Return last row no. of column with blanks at top 7
InputBox for column letter problem 2
A simple if <> nn then Msgbox "No Match" 5
Open four Wbooks, copy four columns from each to Master Wbook 16
Find #N/A in column D 2
Array with many cells from a row but not in order or together 11

Top