. Sélectionner des lignes dans un .csv

Question

Bonjour, 

J'ai écrit une macro qui m'importe un doc .csv "brut", me le modifie et me le reenregistre en .csv pour qu'il soit lu ensuite par un logiciel de pilotage robotique.

Mon problème est que le nombre de ligne de mon .csv "brut" est variable donc dans ma macro, j'ai fait le cas le pire (384 lignes). Le problème est que si mon ".csv brut" fait moins de 384 lignes, les lignes sans données sont quand même traitées par ma macro et sont donc visibles dans mon .csv issu de ma macro sous forme : ,,,,,,,,,,,,,,

Je souhaiterai donc avec ma macro importer mon ".csv brut" comme avnt, le modifier comme avant mais pouvoir sélectionner les lignes contenant des données uniquement  et les enregistrer.

Pourriez-vous m'aider ?

poybi64 · Answer

J'ai oublié de dire merci!

NHenry · Answer

Bonjour, 

Tu peux aussi en mémoire, faire une tableau contenant chacune des lignes de ton fichier.
Comme ça tu pourra traiter ligne par ligne sans problème.

Dim MesLignes as String()
MesLignes=Split(ContenuFichierTexte,vbcrlf)

Puis, tu parcours chacune des lignes

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS et aussi ce lien[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : )
[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés./list
---
Mon site

poybi64 · Answer

merci pour ton aide mais je ne comprend pas....

NHenry · Answer

Bonjour, 

Tu lis l'intégralité de ton fichier et tu mets le texte dans une variable.
puis tu split sur les retours à la lignes, et tu obtiens un tableau contenant une ligne par élément.

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS et aussi ce lien[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : )
[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés./list
---
Mon site

cs_MPi · Answer

Et si tu importes ton fichier CSV dans un onglet Excel, tu peux toujours faire
Dim nbLignes as long
nbLignes = Sheets("LaFeuilleEnQuestion").Cells(Rows.count, "A").end(xlup).row

For I = 1 to nbLignes
...
Next


MPi²
Pour ceux qui programment sous Office, n'oubliez pas qu'il existe un forum dédié à ces applications VBA....... ICI

. Sélectionner des lignes dans un .csv

5 réponses

Votre réponse

Discussions similaires