Discussion :

[a.ouguerzam]

Bonjour,

J’ai un fichier reçu par mon client avec une colonne ou les dates sont format anglais j’ai besoin de convertir cette date en format française dans la dernier colonne vide sur le fichier
La question : il y a un code VBA qui permet de faire le changement en date française
Date anglais : 10/07/2015 date française : 07/10/2015
Merci de votre aide je suis novice en VBA.

[SfJ5Rpw8]

Bonjour,

vérifie déjà si tes dates sont bien au format "date" .. et pas texte , en changeant le format d'affichage format de cellule / Nombre / Date / "mercredi 14 mars 2001"

[a.ouguerzam]

Oui bien sûr tout la colonne ou il Y a les date sont en format date sauf qu’ils sont en format anglais mois/jour/année et moi j’ai besoin d’une date en format française pour que je puise travail correctement.

[Invité]

bonjour,
ton client te fourni un fichier Excel ou CSV?
si c'est de l'Excel les date sont cetré à droit ou à gauche!

[a.ouguerzam]

fichier client format excel
j'ai trouver une solution sur donnes__>convertir__>suivant_>suivant_>changement du format MJA
mais je suis dans le cadre de mettre un fichier bien automatisé.

[Invité]

utilises l’enregistreur de macro!

[a.ouguerzam]

j'ai déjà essaye de mettre l’enregistreur de macro mais ça marche pas
Cette manipulation ça marche juste en manuel

voila le code generé par l'enregistreur :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Sub Convertirdate()
'
' Convertirdate Macro
'
 
'
    Columns("A:A").Select
    Selection.TextToColumns Destination:=Range("B1"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
        :=Array(1, 3), TrailingMinusNumbers:=True
End Sub

[Invité]

pourtant je l'ai pris tel quel et ça marche!

[SfJ5Rpw8]

Oui bien sûr tout la colonne ou il Y a les date sont en format date sauf qu’ils sont en format anglais mois/jour/année et moi j’ai besoin d’une date en format française pour que je puise travail correctement.

Le fait qu'une date soit affichée ne veut pas forcément dire que les données sont au format date (au sens excel) ... as tu essayé de passer les colonne au format long pour vérifier ... "mercredi 14 mai 2001"

[a.ouguerzam]

oui ça marche j'ai pas de message d'erreur mais au niveau résultats pas de changement il garde la mémé forme du date anglais.

[SfJ5Rpw8]

donc c'est bien cela c'est pas des dates mais du texte...

[a.ouguerzam]

ahh non bbil la réponse que j'ai donne c'est pour rdurupt mais les dates sont bien en format date et je suis sur et certaine
juste pour problème j'ai besoin de convertir cette date en format francaise JJ/MM/AAAA dans la dernier colonne vide

[SfJ5Rpw8]

et bien si comme tu le dis les dates sont bien des données de type date ce n'est pas la méthode de rdurupt qui s'applique ..! tu dois seulement changer le format d'affichage de ta date ... d'ailleurs si tu as bien fait ce que je t'ai demandé et que tes dates sont bien des dates au sens excel (et pas du texte ...) tu devrais avoir toutes tes dates au format "mercredi 14 mai 2010"

[a.ouguerzam]

exactement je suis d'accorde avec toi bbil j'ai deja change les dates en format "mercredi 14 mai 2010" sauf que pour mon travail j'ai besoin de mettre la date normal juste le 14/05/2010 JJ/MM/AAAA

[SfJ5Rpw8]

elle est ou la difficulté ? tu choisi le format *14/03/2001 et tout vas bien //

[a.ouguerzam]

je partage avec toi mon fichier pour bien comprendre le problème on essayent tous les solution proposé et la colonne en vert montre le résultats que je cherche.

Convertir Date.xlsx

[SfJ5Rpw8]

peu-être ici : http://www.developpez.net/forums/d84...s-discussions/


sinon tu ne réponds toujours pas ... si tu change le format d'affichage de ta cellule , obtient tu ce que tu veux ou pas ?

[a.ouguerzam]

mémé si je change j'ai toujours la date en format anglais.
il y a pas a code VBA qui dit changé la date vers le format JJ/MM/AAAA dans la dernier colonne vide par exemple

[Docmarti]

Bonjour,

J’ai un fichier reçu par mon client avec une colonne ou les dates sont format anglais j’ai besoin de convertir cette date en format française dans la dernier colonne vide sur le fichier
La question : il y a un code VBA qui permet de faire le changement en date française
Date anglais : 10/07/2015 date française : 07/10/2015

Est-ce que les dates dont le jour est supérieur à 12 sont aussi au format mm/jj/aaaa ?

[a.ouguerzam]

oui par exemple je peux recevoir des fichiers ou il y a sur la colonne A la date en format anglais 12/05/2015 mm/JJ/AAAA mais par contre moi je veux convertir la date dans la dernier colonne vide en francais qui dit JJ/MM/AAA 05/12/2015

j'ai trouve un code sur un forum mais il faut l'optimisé je pense je le partage avec vous :

Code :

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

1
2
3
4
5
6
7
Sub convert_test()
    For i = 1 To 10
        cellule = Cells(i, 5)
        If IsDate(cellule) And VarType(cellule) = 7 Then cellule = DateSerial(Year(cellule), Day(cellule), Month(cellule))
        If IsDate(cellule) Then Cells(i, 6) = CDate(cellule)
    Next
End Sub