[RESOLVED] color change the entire rows

[kamakshi]

I am trying to do from outlook to excel if the cell value is empty change the entire row will be yellow but i have error Cells(c.Row, 7).Value = ""

With Sheets("Sheet1").Range("C6:C29")
          Set c = .Find(MYName, LookIn:=xlValues)
          
          If Not c Is Nothing Then
            MyTime = olMail.ReceivedTime
         
                  Cells(c.Row, 7).Value = MyTime          
                Else
                  Cells(c.Row, 7).Value  = ""
         Range(Cells(c.Row, 1), Cells(c.Row, 7)).Interior.ColorIndex = 35
                        End If
        End With