aide à la conception ODBC-SQL-TXT

bonjour
je dois développer un outil sous VBA EXCEL 2000 :
je souhaiterais avoir un bouton qui lorsqu'on clique dessus scanne des codes articles qui sont dans la colonne A, vérifie des infos pour chacun d'eux dans un fichier txt, puis affiche un résultat dans la colonne B.

Pb: Le fichier txt en question comporte + de 100.000 lignes.

Comment puis-je m'y prendre, y-a-t-il un moyen de faire des requêtes SQL directement dans le fichier txt par ODBC, sans avoir à l'importer dans une feuille excel ? (puisqu'on ne peut pas l'importer à cause de sa taille)

Merci de votre aide

fais l'import sur plusieurs feuilles, regarde la faq ou tutos dédiés à cela

merci mais je voudrais vraiment éviter d'importer les données txt dans le fichier xls pour ne pas l'alourdir

Bonjour,

mais tu cherches quoi exactement dans ce fichier de 100000 lignes ?!
Une référence, du texte, un numéro de ligne ?

en fonction du code article, je vais recherche la valeur d'un champ (ok ou ko)
Mais peu importe à la limite ce que je vais rechercher...
Je pense pouvoir me débrouiller avec une requête ODBC utilisant le Microsoft text driver pour accéder à mon fichier txt.
Si quelqu'un l'a déjà fait, je veux bien un coup de pouce, sinon je posterai la solution lorsque j'y serai arrivé.

Bonjour,

Un petit exemple:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Sub TextSql() Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim strSql As String With cn .ConnectionString = "Driver={Microsoft Text Driver (*.txt; *.csv)};Dbq=C:\Documents and Settings\xxxxxx\Mes documents\Alain\Developpez\;Extensions=asc,csv,tab,txt;" .Open End With strSql = "SELECT * FROM PourSql.txt" rs.Open strSql, cn, adOpenKeyset Do While Not rs.EOF ' Ton traitement rs.MoveNext Loop rs.Close cn.Close End Sub

---

merci beaucoup, c'est concis et très clair, je vais m'en inspirer pour améliorer ce que j'avais fait de mon côté