Discussion :

[imaril]

Bonjour,

j'ai un petit problème suite à l'import d'un fichier CSV.
une de mes colonne importée contient des dates, et dans le fichier excel, les dates sont aléatoirement conciderer comme date ou string ce qui empeche de faire des filtres automatiques.
Le parcours de chacune des ligne avec

Code :

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

 range("h" & ligne)=cdate(range("h" & ligne))

est impossible car le fichier contient plus de 15 000 ligne...
Avez vous une solution ?

[Fvandermeulen]

Bonjour,
...
Le parcours de chacune des ligne avec

Code :

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

 range("h" & ligne)=cdate(range("h" & ligne))

est impossible car le fichier contient plus de 15 000 ligne...
Avez vous une solution ?

Pourquoi n'est-ce pas possible ?

Sinon, en fonction de ta méthode d'import du CSV, tu peux peut-être directement travailler sur les lignes CSV.

A+

[imaril]

je dit que ce n'est pas possible car cette manip prend a peu près 10minutes...
pour les condition dans l'import, en fait quand je fais le workbooks.open et que je met mon fichier CSV, il l'ouvre directement en format excel ( pas toutes les colonnes dans la même cellule) donc je peux pas faire tu convertir...

[Fvandermeulen]

je dit que ce n'est pas possible car cette manip prend a peu près 10minutes...

As tu essayé en mettant le sreenupdating à False et/ou en désactivant les calculs automatiques?
Ca me parrait énorme pour "seulement" 15000 lignes?

[imaril]

oui oui je le fais toujours le screen update
mais vu qu'il y a pas de formule, j'avais pas mis le calculate, je test apres manger avec le calculate et je te tiens au courant

[Didier Gonard]

Bonjour,

par vba ou autre...
tu ajoutes une colonne en vba à côté de la tienne (la C ajoutée par exemple à gauche de la D qui contient tes données) et tu appliques :

Code :

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

1
2
3
4
5
6
Sub Trans()
With Columns("C:C")
    .FormulaR1C1 = "=RC[1]*24/24"
   .NumberFormat = "m/d/yyyy" 'ou format voulu...
End With
End Sub

Sans vba..
tu ajoutes la colonne, tu la sélectionnes, tu tapes =, clic sur la cellule de la m^me ligne de la colonne voulue, *24/24 et tu valides par CTRL+Entrée

tu supprimes l'ancienne ensuite...

cordialement,

Didier