View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
JW[_2_] JW[_2_] is offline
external usenet poster
 
Posts: 638
Default Shade Cells Yellows if Column (D) has a value of C in Cell

Sub highlightStuff()
For i = 30 To Cells(Rows.Count, 4).End(xlUp).Row
If Cells(i, 4).Text = "C" Then
With Range(Cells(i, 4), Cells(i, 29))
.Interior.ColorIndex = 6
.Font.Strikethrough = True
End With
End If
Next i
End Sub

Dean P. wrote:
Please help me put together a macro that will search Column (D), starting in
row 30 for a character 'C', if true then shade all cells in that row yellow
between Column D and Column AC and strike through all values in that same
range of Columns. Column D will have at the most one character in a row.

Thanks so much for the help.