Comment faire pour récupérer des données à partir d'Excel avec connexion ADODB si la première ligne de la feuille de calcul n'ont pas le nom de la colonne?

- Je utiliser ce type de code pour récupérer des données à partir de certains des Classeurs Excel (chemin d'accès est un Paramètre)

Dim strSQL  As String, conStr as String
Dim cnn As New ADODB.Connection
Dim rs As New ADODB.Recordset


conStr = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source='" & path & "';" & _
             "Extended Properties=""Excel 12.0;HDR=YES;IMEX=1;"";"

strSQL = "SELECT [Field1], [Field2] FROM [Worksheet$] WHERE [Thing1] > 1"

cnn.open conStr   
rs.Open query, cnn, adOpenStatic, adLockOptimistic, adCmdText

Que le code fonctionne très bien si les noms des champs sur la première ligne de la feuille de calcul. Le problème est que j'ai besoin de récupérer des données à partir d'une feuille de calcul que le tableau de données commence sur une autre ligne (Ligne 10).

Est-il un moyen de spécifier la première ligne de mon tableau de données?

OriginalL'auteur kb_sou | 2012-10-19

  1. 3

    Voir ce Microsoft page. Vous pouvez utiliser quelque chose comme:

    strSQL = "SELECT [Field1], [Field2] FROM [Worksheet$$A10:B43] WHERE [Thing1] > 1"
    Qui a bien fonctionné, Merci!

    OriginalL'auteur Doug Glancy

  2. 4

    Utilisation nommé ou non de gamme dans votre requête:

    strQuery = "SELECT * FROM MyRange"

strQuery = "SELECT * FROM [Sheet1$A1:B10]"

    Voir ces Microsoft articles de support pour plus d'informations:

    Comment Utiliser ADO avec des Données Excel à partir de Visual Basic ou de VBA

    ExcelADO montre comment utiliser ADO pour lire et écrire des données dans des classeurs Excel

    OriginalL'auteur Anonimista

  3. 2

    Vous pouvez interroger une plage de cellules à partir de la ligne 10:

     "SELECT * FROM [Worksheet$A10:S100] WHERE [Thing1] > 1"

    Ce qui peut être difficile est de trouver ce que la fin de la plage. Vous pourriez mettre dans un nombre ridiculement élevé, mais vous devrez alors ajouter un traitement spécial pour les lignes de NULL à la fin.

    OriginalL'auteur scott