Transformer une valeur en format de date

[satwaf]

Bonjour à tous,
voila j'aimerai savoir quel code VB utilisé pour transformer les nombres en format satandard que je récupere dans un fichier, sous format date "j/mm/aaaa"

8092012
9092012
10092012
11092012
etc.

Auriez vous une solution

 

[Victor21]

Re : Transformer une valeur en format de date

Bonjour, satwaf.

Auriez vous une solution

Comment récupérez-vous ces nombres ?
Serait-ce trop vous demander que de joindre un fichier Excel en illustration de votre question ?
Le VBA est-il obligatoire ?

 

[JHA]

Re : Transformer une valeur en format de date

Bonjour à tous,

pas sur sans fichier mais à essayer

JHA

 

[Victor21]

Re : Transformer une valeur en format de date

Re,

Alternative (La date en A1) :

=1*(STXT(A1;1;NBCAR(A1)-6)&"/"&STXT(A1;NBCAR(A1)-5;2)&"/"&STXT(A1;NBCAR(A1)-1;2))

Mais mes questions précédentes ne sont pas uniquement dictées par la curiosité ...

 

[Modeste geedee]

Re : Transformer une valeur en format de date

Salut Patrick!®

Re,

Alternative (La date en A1) :
Mais mes questions précédentes ne sont pas uniquement dictées par la curiosité ...

🙄 autre alternative :
=1*TEXTE(1*A1;"00""/""00""/""0000")
format de date au choix

 

[Victor21]

Re : Transformer une valeur en format de date

Bonjour, Ponpon 🙂

Salut Patrick!®
🙄
format de date au choix

Redirection 😛

 

[satwaf]

Re : Transformer une valeur en format de date

merci a tous pour votre aide, pour ma part j'ai appliqué cette solution
1 en code vb: Sheets("Données").Range("col_date").FormulaR1C1 = "=Conversion_date"
Sheets("Données").Range("col_date").NumberFormat = "m/d/yyyy"


2 en gestion de nom

Conversion_date =DATE(DROITE(Données!$H506;2)+2000;GAUCHE(DROITE(Données!$H506;6);2);ENT(Données!$H506/1000000))

et j'obtiens le resultats voulu.

encore un grand merci a tous pour votre aide