[VB] Probleme de format de date sous excel

Nours -  
 Nours -
Bonjour, j'ai un gros soucis lors de l'ouverture d'un fichier .txt avec excel sur une chaine de caractere qui represente une date:

dans le fichier texte il est ecrit 11/04/07 (11avril2007)
et je recupere dans excel 04/11/07

Par contre s'il est ecrit 13/04/07 il me ressort bien 13/04/07 n'existant pas de 13eme mois l'ordinateur ne fait plus l'erreur

Mais cela reste quand meme un bug qui existe 12 jour dans le mois et vu que cest pour mon stage en entreprise ce probleme savere important dans le classement des resultats qui s'ensuit.

J'ai bel et bien regler mon ordinateur au format francais donc le probleme ne vient pas de la.

Merci a tout ceux qui pourrait m'aider
A voir également:

3 réponses

bibi94 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,
Comment importes-tu ton fichier .txt dans excel ?
0
Nours
 
Je l'ouvre avec ce code ci sachant que nom est le nom du fichier à ouvrir:

' Ouverture du fichier temporaire
Path = ActiveWorkbook.Path & "\Fiche\"
Workbooks.OpenText Filename:=Path & Nom, Origin:=xlWindows, _
StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, Comma:=False _
, Space:=False, Other:=False, FieldInfo:=Array(1, 1)
0
Nours
 
Le probleme est résolu il suffisait de taper ceci comme code si sa interesse des gens:

' Ouverture du fichier temporaire
Path = ActiveWorkbook.Path & "\Fiche\"
Workbooks.OpenText Filename:=Path & Nom, Origin:=xlWindows, _
StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, Comma:=False _
, Space:=False, Other:=False, FieldInfo:=Array(Array(1, 1), Array(2, 4))
0