Momento del dia según la hora

[harvey]

Hola, se que es una tontería pero no consigo que me salga y es que se trata de que dependiendo de que TIME este entre unas horas y otras el programa muestre "Mañana", "Tarde" o "Noche". Si alguien puede echarme un cable.

[Avellaneda]

Hola, te podrías crear una función como esta:

Código:

Function MañanaTardeNoche(i As Integer) As String
Select Case i
' los valores los cambias a tu gusto
Case 7 To 11
    MañanaTardeNoche = "Mañana"
Case 12 To 21
    MañanaTardeNoche = "Tarde"
Case Else
    MañanaTardeNoche = "Noche"
End Select
End Function

y para llamarla:

Código:

Dim s As String
s = MañanaTardeNoche(Val(Left(Time, 2)))
MsgBox s

Un saludo

[harvey]

Veras es que yo estaba intentando hacerlo haciendo calculos con el tiempo con > y < y eso. A ciertas horas funcionaba bien pero a otras no. No se me habia ocurrido como lo planteas pero voy a probarlo. Gracias.