Assuming your sheet name is "sheet2" if not pls change sheet2's to
your sheet name.
Right click your sheet tab and paste below code.
Will colour B:E range.You can change it to a message though.


Private Sub Worksheet_Change(ByVal Target As Range)
Dim mnb As Double
Dim asd As Double

Application.EnableEvents = False
Application.ScreenUpdating = False

If Not Intersect(Target, Range("B7:L38")) Is Nothing Then

mnb = Application.CountA(Worksheets("sheet2").Range("f" & Target.Row &
":" & "l" & Target.Row))
asd = Application.CountA(Worksheets("sheet2").Range("b" & Target.Row &
":" & "e" & Target.Row))

If mnb 0 And asd = 0 Then
Worksheets("sheet2").Range("b" & Target.Row & ":" & "e" &
Target.Row).Interior.ColorIndex = 44
Else
Worksheets("sheet2").Range("b" & Target.Row & ":" & "e" &
Target.Row).Interior.ColorIndex = xlNone
End If
End If

Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub