comparar horas

[seba123neo]

mas o menos quedaria algo asi:

Código:

Public Function Saludo() As String
If Hour(Time) >= 8 And Hour(Time) <= 12 Then
    Saludo = "Buenos Dias!!!"
    Exit Function
End If
If Hour(Time) >= 13 And Hour(Time) <= 19 Then
    Saludo = "Buenas Tardes!!!"
    Exit Function
End If
If Hour(Time) >= 20 And Hour(Time) <= 24 Then
    Saludo = "Buenas Noches!!!"
    Exit Function
End If
If Hour(Time) >= 0 And Hour(Time) <= 7 Then
    Saludo = "Buenas Madrugadas!!!"
End If
End Function

saludos.