IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Deski Discussion :

Ajouter des heures à une date [Vxi3]


Sujet :

Deski

  1. #1
    Membre régulier
    Inscrit en
    Mai 2006
    Messages
    172
    Détails du profil
    Informations forums :
    Inscription : Mai 2006
    Messages : 172
    Points : 72
    Points
    72
    Par défaut Ajouter des heures à une date
    Bonjour à tous,

    Je n'ai évidement pas accès au designer et je ne dois pas ajouter d'objet perso.

    J'ai 2 champs date dont le format est le suivant "aaaa-mm-jj.hh.mm".
    Je souhaite savoir si la <date 1> +4h est inférieur à la <date 2>.

    J'ai fait ça mais évidemment cela ne fonctionne pas :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    =Si EnDate(SousChaîne( <date 1> , 1 , 16) , "aaaa-mm-jj.hh.mm") + EnDate( "0000-00-00.04.00" , "aaaa-mm-jj.hh.mm" ) < EnDate( SousChaîne( <date 2> , 1 , 16 ) , "aaaa-mm-jj.hh.mm") Alors 
        "DIFFERE" 
    Sinon 
       "IMMEDIAT"
    Avez vous une idée ?

    Mille mercis par avance

  2. #2
    Membre confirmé
    Profil pro
    Inscrit en
    Décembre 2008
    Messages
    364
    Détails du profil
    Informations personnelles :
    Localisation : France, Yvelines (Île de France)

    Informations forums :
    Inscription : Décembre 2008
    Messages : 364
    Points : 551
    Points
    551
    Par défaut
    Bonjour,

    Je convertirais bien tout en minutes en prenant 01/01/2010 00:00 pour année de référence. 4 heures, ça fait 240 mn : si minutes de fin - minutes de début <240 alors immédiat.

    Cordialement,

  3. #3
    Membre régulier
    Inscrit en
    Mai 2006
    Messages
    172
    Détails du profil
    Informations forums :
    Inscription : Mai 2006
    Messages : 172
    Points : 72
    Points
    72
    Par défaut
    Je vais tester ça, merci

  4. #4
    Membre régulier
    Inscrit en
    Mai 2006
    Messages
    172
    Détails du profil
    Informations forums :
    Inscription : Mai 2006
    Messages : 172
    Points : 72
    Points
    72
    Par défaut
    Bonjour,

    J'ai fait ça, mais il y a quelque chose qui merde dans la ligne en rouge, ça me renvoie 0...

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    =Si (EnNombre(SousChaîne( <date 1> , 1 , 4)) < EnNombre(SousChaîne( <date 2> , 1 , 4))) Alors // Année 
      "DIFFÉRÉ"
    Sinon
      Si (EnNombre(SousChaîne( <date 1> , 6 , 2)) < EnNombre(SousChaîne( <date 2> , 6 , 2))) Alors // Mois
        "DIFFÉRÉ"
      Sinon
        Si (EnNombre(SousChaîne( <date 1> , 9 , 2)) < EnNombre(SousChaîne( <date 2> , 9 , 2))) Alors // Jour
          "DIFFÉRÉ"
        Sinon 
          Si (EnNombre(SousChaîne( <date 1> , 12 , 2)) * 60 + EnNombre(SousChaîne( <date 1> , 15 , 2)) + 240 < EnNombre(SousChaîne( <date 2> , 12 , 2)) * 60 + EnNombre(SousChaîne( <date 2> , 15 , 2))) Alors // Heures et minutes
            "DIFFÉRÉ"
          Sinon
            "IMMÉDIAT"
    Edit : J'ai scindé la ligne en rouge dans 2 variables et ça marche :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    hm1 : 
    =EnNombre(SousChaîne( <date 1> , 12 , 2)) * 60 + EnNombre(SousChaîne( <date 1> , 15 , 2)) + 240
    
    hm2 :
    =EnNombre(SousChaîne( <date 2> , 12 , 2)) * 60 + EnNombre(SousChaîne( <date 2> , 15 , 2))
    
    remplacement :
    Si (<hm1> < <hm2> ) Alors

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Ajouter des heures à une date
    Par slash54 dans le forum SQL
    Réponses: 2
    Dernier message: 20/05/2010, 09h58
  2. [Dates] Ajouter des mois à une date
    Par tiger63 dans le forum Langage
    Réponses: 8
    Dernier message: 25/05/2007, 16h42
  3. ajouter des jours à une date
    Par babalastar dans le forum Collection et Stream
    Réponses: 1
    Dernier message: 27/02/2007, 11h39
  4. [HQL] Ajouter des jours à une date
    Par loulou dans le forum Hibernate
    Réponses: 2
    Dernier message: 30/01/2007, 11h22
  5. [VBA-E]ajouter 2 heure à une date récupéré d'une cellule
    Par amel95140 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 08/06/2006, 08h55

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo