Min(Date) Max (Date) : 00/01/1900

Bonjour à tous,

Là il y a un truc que je ne comprend pas,

une colonne avec des dates + heures (pas de cellules vide)

une cellule me demandant : Min(les cellules)

une autre me demandant : Max(les cellules)

J'obtiens : 00/01/1900

la colonne des dates provient d'un résultat machine. J'ai vérifié le format qui est correct : jj/mm/aaaa hh:mm

Bonjour, et non vos données ne sont pas reconnues comme date et heures.

Si vous élargissez la colonne G vous pourrez vous rendre compte que les infos sont alignées vers la gauche ...

signe qu'elles sont reconnues comme texte et non comme valeurs.

Selectionnez la colonne G option "Données" puis "convertir" suivant et validées.

Vos données seront au bon format.

Superbe ça marche merci beaucoup :)

J'ai essayé de créer une macro avec les opérations à faire comme tu m'a expliqué mais ça ne marche pas.

Juste pour info ce sont des fichiers XLSX que j'importe dans ma macro , donc je dois faire l'opération à chaque fois d'où l’intérêt de faire une macro.

    Columns("Q:Q").Select
    Selection.TextToColumns Destination:=Range("Q1"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
        :=Array(1, 1), TrailingMinusNumbers:=True

Je n'ai pas la même macro à l'enregistrement :

Columns("Q:Q").Select
    Selection.TextToColumns Destination:=Range("Q1"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
        :=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True

Bonjour,

Merci pour ton aide mais ça ne marche pas

Mieux que des paroles voici la colonnes qui me pose problème. (Le format est identique à celui que j'ai dans le fichier d'origine)

Pas moyen de trouver, je n'ai jamais eu un cas comme celui là.

Bonsoir à tous !

Pour information, vos données présentent des "erreurs".... Voir ligne 587 et suivantes.

Vous avez la possibilité d'éliminer ces soucis avec Power Query.

Houlaaaa merci

Je ne connais pas du tout Power Query , un peu d'aide ?

Bonsoir de nouveau !

Voir le fichier.

Power Query est nativement dans votre version Excel.

Houlala là tu viens de me toucher :)

J'ai déjà entendu parler de Power Query mais là avec ton aide, je crois que je vais désormais plonger dedans :)

Mille merci à toi

Bonjour, effectivement d'après votre exemple si on clic dans une cellule et que l'on revalide avec la touche entrée cette fois-ci

excel interprète bien l'info comme date.

Dans ce cas une macro pour passer sur chaque cellule de la colonne A et lui indiquer que c'est bien une date ... çà devrait fonctionner.

Sub testbis()
On Error Resume Next
For i = 1 To Range("A65536").End(xlUp).Row
If Range("A" & i).Value <> "" Then
Range("A" & i).Value = CDate(Range("A" & i).Value)
End If
Next i
End Sub

Merci Xmen, ça marche bien