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

8 réponses

  1. Contributeur
    Bonjour,

    Tu devrais essayer avec :
    If timevalue("8:00:00") > t1 Then 
    1. 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.
      1. 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 ?
        1. Contributeur
          1/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.
      2. Contributeur
        Dim Duree As Date
        durée = 8 / 24
        If durée > t1 Then
        --
         Michel
        1. Contributeur
          Ou + simplement

          if T1>8/24 then
      3. OK Michel, comment définir une heure alors...?
        D'avance merci