Probleme de conversion de date dans cellule

biarritz · 19 Décembre 2007

Bonjour,
J'ai un gros probleme avec Excel pour convertir une date
Voila mon probleme
Je recois un fichier sous cette forme

19.12.2007
04.01.2008
31.12.2007
03.01.2008

Quand, je change mon format de cellule manuellement, j'arrive a ca

19/12/07
04/01/08
31/12/07
03/01/08

En revanche, si je change mon ploanning avec la macro( code ci dessous), j'ai des inversions dans la derniere date par exemple

19/12/07
01/04/08
31/12/07
01/03/08

Code

Columns("C:C").Select
Selection.Replace What:=".", Replacement:="/", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

Je voudrais juste via une macro changer mes dates sans inversion
Si quelqu'un a une idee, elle sera la bienvenue, je vous mets le fichier en PJ
Merci d'avance

jp14 · 19 Décembre 2007

Re : Probleme de conversion de date dans cellule

Bonjour

Une piste
utiliser la fonction "convertir" du menu "données"

JP

RENAUDER · 19 Décembre 2007

Re : Probleme de conversion de date dans cellule

Bonjour,
Essaies avec Données, Convertir

Code:

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

biarritz · 19 Décembre 2007

Re : Probleme de conversion de date dans cellule

Merci Renauder mais la solution de JP14 marche parfaitement
Merci a vous deux

RENAUDER · 19 Décembre 2007

Re : Probleme de conversion de date dans cellule

Bonjour Biarritz,
C'est la même méthode que JP14 mais en VBA tout simplement.
A+

Probleme de conversion de date dans cellule

biarritz

XLDnaute Nouveau

Pièces jointes

jp14

XLDnaute Barbatruc

RENAUDER

Nous a quitté

biarritz

XLDnaute Nouveau

RENAUDER

Nous a quitté

Discussions similaires