Ampliación a MACRO con EVENTO compara alfanuméricos

Vengo utilizando la MACRO con EVENTO que compara 2 columnas con datos alfanumericos y da como comentario en col. "Resultado", a la que te pido una modicacion, que es la siguiente, cuando encuentre una celda vacía durante la comparación, en la columna donde va el comentario se escriba "SIN DATOS", pintado en rojo, este es la Macro que tu confeccionaste

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Por.Dante Amor 9 NOV 2015
    If Target.Row < 5 Then Exit Sub
    If Target.Count > 5 Then Exit Sub
    Cells.Interior.ColorIndex = 0
    If Not Intersect(Target, Columns("B")) Is Nothing Then
        Target.EntireRow.Interior.ColorIndex = 42
        If Cells(Target.Row, "D") = "" Or Cells(Target.Row, "E") = "" Then Exit Sub
        If Cells(Target.Row, "D") = Cells(Target.Row, "E") Then
            With Cells(Target.Row, "F")
                .Value = "ok"
                .Font.ColorIndex = 3
                .Font.Size = 14
            End With
        Else
            With Cells(Target.Row, "F")
                .Value = "CAMBIAR"
                .Font.ColorIndex = xlAutomatic
                .Font.Size = 11
            End With
        End If
    End If
End Sub