Discussion :

[Yoann B]

Bonjour,

Je dois mettre en forme une extraction CSV via une Macro pour me permettre de mettre à jour un second fichier.

Quand je fais l'action manuellement, cela fonctionne très bien.

Quand je le le fais via la macro, la date n'est pas reconnu comme une date et reste sous forme de "texte".
Si je double clique sur la cellule puis valide par entré cela passe la date en format date.

La mise en forme du format de la cellule ne fonctionne pas.



Le petit morceau de code concerné est le suivant:

Code :

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

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

Avez-vous une solution ? Je suis persuadé que la réponse est simple mais je n'arrive pas à trouver.
Merci par avance.

Cordialement

[78chris]

Bonjour

C'est au niveau de l'import qu'il faut typer correctement la colonne en précisant l'ordre (souvent US)

TU as 2016 donc il peut être judicieux d'inverser le problème : utiliser PowerQuery depuis le fichier à mettre à jour pour récupérer les données du CSV