I added the .Offset line to clear the rest of the line if Client is blank like in Line 7
' ------------------------------------------- client
For Each rCell In rData.Columns(colClient).Cells
With rCell
If Len(.Value) = 0 Then
.EntireRow.Interior.Color = xlNone
.EntireRow.Font.ColorIndex = xlColorIndexAutomatic
.Offset(0, 1).Resize(1, .Parent.Columns.Count - 2).ClearContents
End If
End With
Next
Clearing and entering a State seems to clear the Region and Oracle fields like in line2
Capture.JPG
Any more details?