Discussion :

[Jay29]

Bonjour à tous !

Je me permets de vous demandez votre aide, car j'ai un problème avec une macro créée par mes soins. Celle-ci consiste a convertir un fichier .txt en .xls pour que les colonnes soient bien délimités. Le problème est que j'ai des colonnes avec des dates aux formats jj/mm/aaaa cependant après lancement de ma macro les dates sont aux format mm/jj/aaaa. Pourtant jai fait un enregistrement manuel et ai fait un copier-coller du code que voici :

Code :

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

1
2
3
4
5
6
7
8
9
nom = Application.GetOpenFilename("Nom fichier,*.txt")
Workbooks.OpenText nom, _
        Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
        xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, Semicolon:=False _
        , Comma:=True, Space:=False, Other:=False, FieldInfo:=Array(Array(1, 1), _
        Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), Array(7, 1), Array(8, 1), _
        Array(9, 1), Array(10, 1), Array(11, 1), Array(12, 1), Array(13, 1), Array(14, 1), Array(15 _
        , 1), Array(16, 1), Array(17, 1), Array(18, 1), Array(19, 1), Array(20, 1), Array(21, 1), _
        Array(22, 1), Array(23, 1), Array(24, 1), Array(25, 1)), TrailingMinusNumbers:=True

Merci d'avance pour votre aide!

[FCL31]

Tu peu utiliser

Code :

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

Columns("A:A").NumberFormat = "dd/mm/yyyy"

[Jay29]

Merci pour ta réponse.

Cependant ça ne fonctionne pas car j'ai l'impression que excel considère que la date est déjà au format français or ce n'est pas le cas.

[fgiambelluco]

Bonjour
Dans l'assistant on pouvait préciser comment arrivait la date.
Repère la colonne qui contient ta date et essaie

Code :

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

 Array(numColDate, 4)

[Jay29]

Effectivement il fallait que je modifie ces paramètres je n'avais pas vu!

Merci beaucoup à toi !!!