1. Ce site utilise des "témoins de connexion" (cookies) conformes aux textes de l'Union Européenne. Continuer à naviguer sur nos pages vaut acceptation de notre règlement en la matière. En savoir plus.

Récupérer date/heure sous condition

Discussion dans 'Forum Excel' démarrée par Jefekoi, 12 Janvier 2019 à 11:14.

  1. Jefekoi

    Jefekoi XLDnaute Junior

    Inscrit depuis le :
    19 Février 2009
    Messages :
    74
    "J'aime" reçus :
    0
    Sexe :
    Masculin
    Bonjour et mes meilleurs vœux 2019 à tous

    J'ai une colonne qui se nomme "Time" elle se présente comme ci dessous

    Je voudrais récupérer la plus ancienne et la plus récente (date / Heure)

    J'ai fais comme ceci :

    Maxi =WorksheetFunction.Max(Range("Time"))
    Mini = WorksheetFunction.Max(Range("Time"))

    Ça marche très bien sauf que ... Comme vous pouvez le voir pour le Min il me donne 0/1/00 0 :00

    A savoir c'est un résultat qui vient d'un logiciel (importation d'un fichier excel avec divers informations , je ne peux pas modifier les 4 premières lignes ni le Nom "Time"

    Il y a -il un moyen de lui demander de sélectionner la colonne Time en commençant par la quatrième ligne ?


    Merci pour votre aide


    Eric


    0/1/00 0:00
    0/1/00 0:00
    0/1/00 0:00
    Time
    20/11/18 8:07
    20/11/18 8:07
    20/11/18 8:07
    20/11/18 8:07
    20/11/18 8:08
    20/11/18 8:08
    20/11/18 8:18
    20/11/18 8:18
    20/11/18 8:19
    20/11/18 8:21
     
    Dernière édition: 12 Janvier 2019 à 11:29
  2. Chargement...

    Discussions similaires - Récupérer date heure Forum Date
    Recuperer et enregistrer sur autre classeur la date, l'heure et les donnees saisies Forum Excel 12 Juillet 2012
    Recuperer date et heure dans cellules Forum Excel 17 Avril 2012
    Récupérer que la date et supprimer l'heure d'une cellule Forum Excel 23 Juin 2010
    récupérer des dates Forum Excel 8 Janvier 2019
    Comment récupérer une date dans une texbox Forum Excel 27 Novembre 2017

  3. Dranreb

    Dranreb XLDnaute Barbatruc

    Inscrit depuis le :
    31 Janvier 2011
    Messages :
    14739
    "J'aime" reçus :
    904
    Sexe :
    Masculin
    Habite à:
    Belfort
    Utilise:
    Excel 2016 (PC)
    Bonjour.
    Essayez :
    Code (Visual Basic):
    Mini = WorksheetFunction.Max(Range("Time").Offset(4).Resize(Range("Time").Rows.Count - 4))
     
  4. Jefekoi

    Jefekoi XLDnaute Junior

    Inscrit depuis le :
    19 Février 2009
    Messages :
    74
    "J'aime" reçus :
    0
    Sexe :
    Masculin
    Merci Dranreb, je vais tester dés que possible et je reviendrais vers vous :)
     
  5. Jefekoi

    Jefekoi XLDnaute Junior

    Inscrit depuis le :
    19 Février 2009
    Messages :
    74
    "J'aime" reçus :
    0
    Sexe :
    Masculin
    Il me fait une erreur :
    Erreur d'exécution "1004":
    La méthode "Offset" de l'Objet " Range" a échoué
     
  6. job75

    job75 XLDnaute Barbatruc

    Inscrit depuis le :
    15 Mai 2008
    Messages :
    26015
    "J'aime" reçus :
    2233
    Sexe :
    Masculin
    Habite à:
    Paris
    Utilise:
    Excel 2013 (PC)
    Bonjour jefekoi, Bernard,
    Code (Text):
    Maxi = WorksheetFunction.Max(Range("Time").Resize(Range("Time").Rows.Count - 4).Offset(4))
    Mini = WorksheetFunction.Min(Range("Time").Resize(Range("Time").Rows.Count - 4).Offset(4))
    A+
     
  7. Dranreb

    Dranreb XLDnaute Barbatruc

    Inscrit depuis le :
    31 Janvier 2011
    Messages :
    14739
    "J'aime" reçus :
    904
    Sexe :
    Masculin
    Habite à:
    Belfort
    Utilise:
    Excel 2016 (PC)
    Oui, ça peut mieux marcher comme ça si "Time" se réfère à une colonne entière au lieu d'une plage verticale limitée en nombre de lighes, ce que je ne pouvais deviner sans voir le classeur.
     
  8. Jefekoi

    Jefekoi XLDnaute Junior

    Inscrit depuis le :
    19 Février 2009
    Messages :
    74
    "J'aime" reçus :
    0
    Sexe :
    Masculin
    Effectivement là ça marche merci beaucoup pour votre aide
     

Partager cette page