FONCTION QUI PERMET DE LIRE UN CHAMP DANS UN CSV EN FONCTION DE SA LIGNE ET DE S

cs_JACKY007 Messages postés 23 Date d'inscription vendredi 16 septembre 2005 Statut Membre Dernière intervention 1 décembre 2010 - 4 févr. 2008 à 09:02
Solenoyde Messages postés 14 Date d'inscription jeudi 17 janvier 2008 Statut Membre Dernière intervention 4 février 2008 - 4 févr. 2008 à 13:35
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/45603-fonction-qui-permet-de-lire-un-champ-dans-un-csv-en-fonction-de-sa-ligne-et-de-sa-colonne

Solenoyde Messages postés 14 Date d'inscription jeudi 17 janvier 2008 Statut Membre Dernière intervention 4 février 2008
4 févr. 2008 à 13:35
Ah merci pour ce commentaire !

C'est vrai que la fonction est un peut longue pour ce quelle fait hehe ...
et cette petite ligne 'dim ligne As string = fileContents.split(separateurLigne)(Ligne) ma l'air bien sympa.

Je vais donc essayer d'appliquer votre conseil et encore merci, car sans crtitiques on progresse pas beaucoup tout seul...
cs_JACKY007 Messages postés 23 Date d'inscription vendredi 16 septembre 2005 Statut Membre Dernière intervention 1 décembre 2010
4 févr. 2008 à 09:02
C'est bien compliqué pour une si petite chose...
1er étape : lire le fichier.
Conseil pour commenser, utilise les extraits de codes !!!
Celui-ci nous donne :
Dim fileContents As String
fileContents = My.Computer.FileSystem.ReadAllText("C:\Test.txt")
Ensuite on pointe sur la ligne :
dim ligne As string = fileContents.split(separateurLigne)(Ligne)
Généralement, separateurLigne=vbLf : tu peux le mettre dans la fonction en optionnal. Cela te permettra de l'utiliser plus tard pour d'autres choses

Puis sur notre champ :
dim champ As string = ligne.split(separateurColonne)(Colonne)
return champ
Fini !
En 3 lignes (sans la gestion d'erreur) tu as le résultat...
Pour ce qui est de du nombre de lignes et de colonnes tu peux rajouter des UBound sur les tableaux (il te faudra 2 lignes de plus!)
Dernier conseil : place ta fonction dans tes extraits de codes pour la réutiliser plus tard.
Sinon ton code est propre, bien aéré et commenté.
Bonne chance pour la suite.
Respectueusement.
Rejoignez-nous