[VBA excel] Texte en fonction de l'heure Résolu/Fermé

Question

Bonjour,

J'essaie de faire en sorte qu'en fonction de l'heure de la journée, une cellule affiche soit "matin", "soir" ou "nuit".
Par exemple entre 5h et 13h ma cellule doit afficher "matin" entre 13h et 21h "soir" et entre 21h et 5h "nuit".
J'aimerai que tout le code soit dans une macro.

J'ai trouvé quelques pistes comme

Range("macellule").Value="......." mais dans cette partie je ne sais pas comment mettre ma condition.

De plus je ne sais pas comment ecrire cette condition.
Je pensais à quelquechose comme ça:

if heure > 5 and heure < 13 then
value="matin
elseif heure > 13 and heure < 21 then
value="soir"
else value="nuit"
endif

en fait je ne sais pas ce que je dois déclarer comme variable quel type de variable.
Je suis un peu perdu.

Merci pour votre aide

altra · Accepted Answer

J'ai trouvé une solution qui répond à mes attentes, je la poste ici si quelqun en a besoin :

Sub heure()
If Time >= "05:00:00" And Time < "13:00:00" Then
Range("G1") = "Matin"
ElseIf Time >= "13:00:00" And Time < "21:00:00" Then
Range("G1") = "Soir"
Else
Range("G1") = "Nuit"
End If
End Sub

Bonne journée

[VBA excel] Texte en fonction de l'heure

1 réponse

Discussions similaires