![]() |
If Column T contains then
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? |
If Column T contains then
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 -- joel ------------------------------------------------------------------------ joel's Profile: http://www.thecodecage.com/forumz/member.php?userid=229 View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=159775 Microsoft Office Help |
If Column T contains then
Very nice. Thank you for the extra help.
"joel" wrote: 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 -- joel ------------------------------------------------------------------------ joel's Profile: http://www.thecodecage.com/forumz/member.php?userid=229 View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=159775 Microsoft Office Help . |
All times are GMT +1. The time now is 03:45 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com