Discussion :

[Pitoux]

J'ai pas le fichier EXCEL sur moi.
Je test cela demain matin et je vous tiens au courant

1000 Merci pour votre aide.
Bonne soirée a vous

Laurent

[Elstak]

- ELSTAK ( a qui j'ai envoyé le fichier)

T'es vraiment qu'une sale balance

pour info j'ai rien trouvé de plus jvoulais juste tester ma solution sur son fichier

[Vesta]

Et simplement...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
extrac_dates=split(extrac_dates," ")(0)

12/05/2006 14:14:54
donnerai ca 12/05/2006
c'est tout ce kil faut

[AlainTech]

On en est à 63 messages pour un problème simple!

N'aurait-on pas oublié ceci:

Essaye ça:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub test()
  Dim extrac_date As Date
  extrac_date = "12/05/2006 14:14:54"
  MsgBox Int(extrac_date)
End Sub

???

En VB, une date est exprimée par un nombre. La partie entière détermine le jour et la partie décimale, les portions de jour (h, m et s).
Il suffit de prendre la partie entière pour ne garder que le jour.

[Vesta]

Alain ca ne rique pas d'arondir a l'unité sup?

[ouskel'n'or]

Hello Alain,
Je sais que tu es le meilleur mais ma méthode à moi... elle fonctionne aussi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Sub MonTestAmoi()
Dim extrac_dates
    extrac_dates = "12/05/2006 14:14:54"
    MsgBox Format(CDate(extrac_dates), "dd/mm/yyyy")
End Sub

L'avantage étant que Vesta pourra dormir tranquile puisqu'il n'aura plus à poser de question d'arrondi sup ou inf.

A+

N'empêche que Pitoux, il pourrait se manifester qu'on serait tous bien content

[Vesta]

La mienne aussi lol

une ligne en plus

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Split(extractdate, " ")(0)

[AlainTech]

Je sais qu'il y a plein de manière d'y arriver mais celle que je propose est celle qui est la plus optimisée.

Ceci dit, je ne revendique rien mais on oublie souvent qu'une date est un nombre en VB.

De plus, ayant fait le test sur une chaine dont le jour est <= 12, je n'ai pas l'effet "date américaine".

[ouskel'n'or]

Hello Alain, je me sens visé... Mais je suis d'accord avec toi. C'était juste pour taquiner. Je n'allais pas me déjuger tout de même...

[AlainTech]

Hello Alain, je me sens visé... (

Mais non