Bonjour,
J'ai des problèmes avec l'importation de date.
Par l'intermédiaire d'une macro,j'ouvre dans excel un fichier csv . Ce
fichier comporte des dates. Si j'ouvre le fichier dans un éditeur de texte
les dates sont au format jj/mm/aaa hh:mm. Lorsqu'elle arrive dans excel elle
se présente sous la forme mm/jj/aaaa hh:mm si le jour est inférieur à 13.
Quelqu'un peut-il m'aider à comprendre ce qui se passe ,
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
GD
Bonsour® Stspuc si tu utilises la méthode : Workbooks.OpenText filename:="DATA.CSV", dataType:=xlDelimited, etc.... ajoute le parametre : ,Local:=True
sinon il faut que tu définisses le type chaque champ et notament pour les champs Date préciser le format lu (Etape 3 de l'assistant d'importation)
@+
ajoute "wrote:
Bonjour, J'ai des problèmes avec l'importation de date. Par l'intermédiaire d'une macro,j'ouvre dans excel un fichier csv . Ce fichier comporte des dates. Si j'ouvre le fichier dans un éditeur de texte les dates sont au format jj/mm/aaa hh:mm. Lorsqu'elle arrive dans excel elle se présente sous la forme mm/jj/aaaa hh:mm si le jour est inférieur à 13. Quelqu'un peut-il m'aider à comprendre ce qui se passe ,
Merci d'avance
Bonsour® Stspuc
si tu utilises la méthode :
Workbooks.OpenText filename:="DATA.CSV", dataType:=xlDelimited, etc....
ajoute le parametre :
,Local:=True
sinon il faut que tu définisses le type chaque champ et notament pour les
champs Date préciser le format lu
(Etape 3 de l'assistant d'importation)
@+
ajoute
"wrote:
Bonjour,
J'ai des problèmes avec l'importation de date.
Par l'intermédiaire d'une macro,j'ouvre dans excel un fichier csv . Ce
fichier comporte des dates. Si j'ouvre le fichier dans un éditeur de
texte les dates sont au format jj/mm/aaa hh:mm. Lorsqu'elle arrive
dans excel elle se présente sous la forme mm/jj/aaaa hh:mm si le jour
est inférieur à 13. Quelqu'un peut-il m'aider à comprendre ce qui se
passe ,
Bonsour® Stspuc si tu utilises la méthode : Workbooks.OpenText filename:="DATA.CSV", dataType:=xlDelimited, etc.... ajoute le parametre : ,Local:=True
sinon il faut que tu définisses le type chaque champ et notament pour les champs Date préciser le format lu (Etape 3 de l'assistant d'importation)
@+
ajoute "wrote:
Bonjour, J'ai des problèmes avec l'importation de date. Par l'intermédiaire d'une macro,j'ouvre dans excel un fichier csv . Ce fichier comporte des dates. Si j'ouvre le fichier dans un éditeur de texte les dates sont au format jj/mm/aaa hh:mm. Lorsqu'elle arrive dans excel elle se présente sous la forme mm/jj/aaaa hh:mm si le jour est inférieur à 13. Quelqu'un peut-il m'aider à comprendre ce qui se passe ,
Merci d'avance
MichDenis
Bonjour Stspuc,
Voici un exemple : Tu dois connaître davance la colonne qui contient des dates. Dans l'exemple soumis la colonne est 2. Remplace 2 dans cette ligne de code : Array(2, xlDMYFormat) par le numéro de la colonne de tes données.
N.B. Tu peux choisir le format de date de ton choix en remplaçant ceci : "dd MMM YYYY" par le format approprié
'--------------------------- Sub Exemple() Dim Fichier As String Fichier = "c:test.csv" OuvrirFichier Fichier End Sub '--------------------------- Sub OuvrirFichier(NomFichier As String) Dim Wk As Workbook Set Wk = Workbooks.Open(NomFichier) Wk.Sheets(1).Columns(1).TextToColumns _ Range("A1"), , , False, , True, FieldInfo:=Array(2, xlDMYFormat) Wk.Sheets(1).Columns(2).NumberFormat = "dd MMM YYYY" Set Wk = Nothing End Sub '---------------------------
Salutations!
"Stspuc" a écrit dans le message de news: Bonjour, J'ai des problèmes avec l'importation de date. Par l'intermédiaire d'une macro,j'ouvre dans excel un fichier csv . Ce fichier comporte des dates. Si j'ouvre le fichier dans un éditeur de texte les dates sont au format jj/mm/aaa hh:mm. Lorsqu'elle arrive dans excel elle se présente sous la forme mm/jj/aaaa hh:mm si le jour est inférieur à 13. Quelqu'un peut-il m'aider à comprendre ce qui se passe ,
Merci d'avance
Bonjour Stspuc,
Voici un exemple : Tu dois connaître davance la colonne qui contient des dates. Dans l'exemple soumis la colonne est 2. Remplace 2
dans cette ligne de code : Array(2, xlDMYFormat) par le numéro de la colonne de tes données.
N.B. Tu peux choisir le format de date de ton choix en remplaçant ceci : "dd MMM YYYY" par le format approprié
'---------------------------
Sub Exemple()
Dim Fichier As String
Fichier = "c:test.csv"
OuvrirFichier Fichier
End Sub
'---------------------------
Sub OuvrirFichier(NomFichier As String)
Dim Wk As Workbook
Set Wk = Workbooks.Open(NomFichier)
Wk.Sheets(1).Columns(1).TextToColumns _
Range("A1"), , , False, , True, FieldInfo:=Array(2, xlDMYFormat)
Wk.Sheets(1).Columns(2).NumberFormat = "dd MMM YYYY"
Set Wk = Nothing
End Sub
'---------------------------
Salutations!
"Stspuc" <stspuc@hotmail.fr> a écrit dans le message de news: ei0AceGQFHA.3496@TK2MSFTNGP12.phx.gbl...
Bonjour,
J'ai des problèmes avec l'importation de date.
Par l'intermédiaire d'une macro,j'ouvre dans excel un fichier csv . Ce
fichier comporte des dates. Si j'ouvre le fichier dans un éditeur de texte
les dates sont au format jj/mm/aaa hh:mm. Lorsqu'elle arrive dans excel elle
se présente sous la forme mm/jj/aaaa hh:mm si le jour est inférieur à 13.
Quelqu'un peut-il m'aider à comprendre ce qui se passe ,
Voici un exemple : Tu dois connaître davance la colonne qui contient des dates. Dans l'exemple soumis la colonne est 2. Remplace 2 dans cette ligne de code : Array(2, xlDMYFormat) par le numéro de la colonne de tes données.
N.B. Tu peux choisir le format de date de ton choix en remplaçant ceci : "dd MMM YYYY" par le format approprié
'--------------------------- Sub Exemple() Dim Fichier As String Fichier = "c:test.csv" OuvrirFichier Fichier End Sub '--------------------------- Sub OuvrirFichier(NomFichier As String) Dim Wk As Workbook Set Wk = Workbooks.Open(NomFichier) Wk.Sheets(1).Columns(1).TextToColumns _ Range("A1"), , , False, , True, FieldInfo:=Array(2, xlDMYFormat) Wk.Sheets(1).Columns(2).NumberFormat = "dd MMM YYYY" Set Wk = Nothing End Sub '---------------------------
Salutations!
"Stspuc" a écrit dans le message de news: Bonjour, J'ai des problèmes avec l'importation de date. Par l'intermédiaire d'une macro,j'ouvre dans excel un fichier csv . Ce fichier comporte des dates. Si j'ouvre le fichier dans un éditeur de texte les dates sont au format jj/mm/aaa hh:mm. Lorsqu'elle arrive dans excel elle se présente sous la forme mm/jj/aaaa hh:mm si le jour est inférieur à 13. Quelqu'un peut-il m'aider à comprendre ce qui se passe ,
Qu'est-ce qui fait le monsieur si il ne possède pas une version Excel récente ?
;-))
Salutations!
"GD" a écrit dans le message de news: O$pDo$ ;o))) MichDenis wrote: http://minilien.com/?ZCQjU1DJ2c
Bonjour GD,
Qu'est-ce qui fait le monsieur si il ne possède pas une version Excel récente ?
;-))
Salutations!
"GD" <nomail@nomail.net> a écrit dans le message de news: O$pDo$GQFHA.2580@TK2MSFTNGP10.phx.gbl...
;o)))
MichDenis wrote:
http://minilien.com/?ZCQjU1DJ2c
