Discussion :

[altra]

Bonjour,

J'essai 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 utilisé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
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....

J'ai lu pas mal de tuto et peut etre un peu trop du coup je suis perdu

Merci pour votre aide

[Krovax]

Regarde aucune variable a déclarer

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
If Time >= "05:00:00" And Time < "13:00:00" Then
Range("A1")= "Matin"
ElseIf Time >= "13:00:00" And Time < "19:00:00" Then
Range("A1")= "Après-midi"
ElseIf Time >= "19:00:00" And Time < "21:00:00" Then
Range("A1")= "Soit"
Else
Range("A1")= "Nuit"
End If

Time = lheure actuelle
tu peux remplacer time par une variable de type date

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
dim Hr as date
Hr="15:15:00"
if Hr>= "05:00:00" And Hr< "13:00:00" Then
'...

Mais c'est très bien de déclarer les variables encore mieux si tu te mets en option explicite

Dans ton cas Value aurait du être une chaine de caractère donc de type string, mais c'est un mot réservé range("A1").value par exemple a éviter pour le principe.
Heure pourrais être une variable de type date mais il aurais falut que tu trouve le moyen de récupéré juste le nombre d'heures de l'heure.

[altra]

Merci bien, ça marche nickel, c'est exactement ce que je voulais.
Et dire que j'ai chercher deux jours pour un code qui semble aussi simple.

En tout cas merci pour tout.

Bonne journée