lire dans un fichier csv ou txt

[mmoidany]

Bonjour à tous et à toutes !!!!!

Je désire depuis excel en vba lire dans un fichier csv ou txt avec séparateur ;

J'ai écrit ce code mais il ne fonctionne pas
""""""""""""""""
' Ouvre le fichier en lecture
Open "C:\bd\etiquetage.txt" For Input As #1
' Effectue la boucle jusqu'à la fin du fichier
Do While Not EOF(1) And Not lexit
' Lit les données dans trois variables
Input #1, chrono_bd, negoce_bd, designation_bd
' Je compare la ref négoce avec la bd
If negoce & "A" = negoce_bd Then
lexit = True
End If
Loop

' Ferme le fichier
Close #1
"""""""""""""""""""""""""""

En effet, ce code ne fonctionne qu'avec un séparateur ","
(limitation dûe à Input #1

Auriez-vous une autre méthode pour lire un fichier csv
ligne par ligne pour rechercher une valeur dans l'un des
champs ???????????????

merci par avance

 

[Yeahou]

Bonjour mmoidany, le forum

utilise lineinput #1 au lieu de input #1, stocke la ligne dans une variable texte que tu pourras analyser avec lineinput #1, mavariable


Cordialement, A+

 

[mmoidany]

merci beaucoup pour ta réponse !!!!

effectivement, je dois passer par un Line input puis décortiquer le continu de la ligne en recherchant les ; de séparation

Merci tout fonctionne nickel