Gewusst wie: abrufen von Daten aus Excel mit ADODB-Verbindung, wenn die erste Zeile des Arbeitsblatts, nicht den Namen der Spalte?

Verwende ich den folgenden code zum abrufen von Daten von einigen Excel-Arbeitsmappen (Pfad ist ein Parameter)

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

Dass code, der funktioniert gut, wenn die Namen der Felder in der ersten Zeile des Arbeitsblatts. Das problem ist, dass ich brauche zum abrufen von Daten aus einem Arbeitsblatt, das die Daten der Tabelle beginnt auf einer anderen Zeile (Zeile 10).

Gibt es eine Möglichkeit zu geben Sie die erste Zeile meiner Tabelle mit Daten?

InformationsquelleAutor kb_sou | 2012-10-19

  1. 3

    Sehen diese Microsoft Seite. Sie können so etwas wie:

    strSQL = "SELECT [Field1], [Field2] FROM [Worksheet$$A10:B43] WHERE [Thing1] > 1"
    Das hat gut funktioniert, Danke!

    InformationsquelleAutor Doug Glancy

  2. 4

    Verwenden Sie eine benannte oder Unbenannte Reihe in der Abfrage:

    strQuery = "SELECT * FROM MyRange"

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

    Finden Sie auf dieser Microsoft-support-Artikel für weitere Informationen:

    Verwendung von ADO mit Excel-Daten von Visual Basic oder VBA

    ExcelADO zeigt, wie ADO zum Lesen und schreiben von Daten in Excel-Arbeitsmappen

    InformationsquelleAutor Anonimista

  3. 2

    Können Sie die Abfrage einer Reihe von Zellen ab Zeile 10:

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

    Was kann hart sein, ist zu finden, was das Ende der Reihe sein sollte. Könnten Sie in einem lächerlich großen Zahl, aber dann würden Sie hinzufügen müssen, um die spezielle Behandlung für die Zeilen, die NULL am Ende.

    InformationsquelleAutor scott

Schreibe einen Kommentar