Formule condition temps
Résolu
QQ peut il me dire ce qu'il y a de faux dans ma formule, t1 et t2 sont des heures au format heure issus d'une liste :
Function temps_moins_pauses(t As Variant) As Variant
Dim t1 As Variant
Dim t2 As Variant
t1 = Range("E9")
t2 = Range("F9")
If "8:00:00" > t1 Then
temps_moins_pauses = t - 0.00694444444
Else
temps_moins_pauses = t
End If
End Function
Function temps_moins_pauses(t As Variant) As Variant
Dim t1 As Variant
Dim t2 As Variant
t1 = Range("E9")
t2 = Range("F9")
If "8:00:00" > t1 Then
temps_moins_pauses = t - 0.00694444444
Else
temps_moins_pauses = t
End If
End Function
8 réponses
-
Hello..
-
ContributeurBonjour
If "8:00:00" > t1
ne veut rien dire....
-
OK Michel, comment définir une heure alors...?
D'avance merci -
Contributeur
Dim Duree As Date
--
durée = 8 / 24
If durée > t1 Then
Michel -
Ma date est issue d'une liste, c'est une variable en E9..
tes solutions ne fonctionnent pas du coup.. En as tu une autre ?-
Contributeur1/je ne vois pas le rapport entre
Ma date est issue d'une liste, c'est une variable en E9..
et
<ital>"08:00:00"
"08:00:00": le fait qu'il y ait des guillemets fait que l'on a affaire à un texte et non à une date-heure
d'autre part, on se demande que viennent faire t2 et t qui n'ont aucune utilité dans la macro.
-
-
En fait, j'ai créé une liste d'heure en E9 (0:00; 0:05; 0:10 etc...).
Il s’agit d'une variable t1 dont la formule va dépendre.
t est le résultat de la formule
t2 servira plus tard, ne pas en tenir compte pour l'instant. -
ContributeurBonjour,
Tu devrais essayer avec :If timevalue("8:00:00") > t1 Then -
OK ca marche ;-)
Un grand merci a gbinforme et michel_m
