OleDb 连接到 Excel；如何选择固定宽度、无限高度？

我正在使用 OleDb 从 Excel 电子表格中选择数据。每个电子表格可以包含许多小表格，可能还包含标题和标签等家具。所以它可能看起来像这样，我们有两个表和一些标题；

            A           B         C          D
    1    .           .         .          .
    2    .           .         .          .
    3    Table1      .         .          .
    4    Header1     HEADER2   .          .
    5    h           huey      .          .
    6    d           dewey     .          .
    7    l           loius     .          .
    8    s           scrooge   .          .
    9    .           .         .          .
    10   .           .         .          .
    11   .           .         .          .
    12   .           .         .          .
    13   .           Table 2   .          .
    14   .           HEADER1   HEADER2    HEADER3
    15   .           1         foo        x
    16   .           2         bar        y
    17   .           3         baz        z
    18   .           .         .          .
    19   .           .         .          .
  

在上一步中，用户选择了他们感兴趣的表的标题；在这种情况下，查看表 2，他们将选择范围B14:D14.

这些设置已保存，然后我需要查询该表。随着电子表格数据的更新，这种情况可能会反复发生；可以随时添加更多行，但标题始终是固定的。有一个哨兵（空白行）标记数据的结尾

为了选择表中的数据，我正在编写这样的查询；

SELECT * FROM [Sheet1$B14:D65535]

选择表2中的数据，然后手动检查前哨行，但这似乎并不令人满意。 Excel 2003 只能读取 65,535 行 (uint16)，但 Excel 2007 可以读取更多行 (uint32)，因此我必须编写代码，根据文件的扩展名（.xls 与 .xls）为 Excel 2003 和 2007 提供不同的查询。 xls？）。

有谁知道一种编写查询的方法；

• “选择 B14 下方和右侧的所有内容”？
• '选择 B->D 列中的所有内容'
• “选择 B12:D*”，其中 * 表示“尽你所能”

先决条件：您可以轻松地在代码中确定最大行数是多少。

假设 (1) 每个 SELECT 有很大的开销，因此一次选择一行很慢 (2) 选择 64K 或 8M 行（即使是空白）很慢......所以你想看看中间的某个地方是否可以快点。尝试这个：

一次选择 CHUNKSIZE（例如 100 或 1000）行（当您超出 MAX_ROWS 时选择较少的行）。扫描每个块以查找标记数据结束的空白行。

更新：实际上回答明确的问题：

问：有谁知道如何编写查询：

Q1：“选择B14下方和右侧的所有内容”？

A1: select * from [Sheet1$B12:]不起作用。你必须这样做...B12:IV在 Excel 2003 中以及 Excel 2007 中的任何内容。但是您不需要它，因为您知道最右边的列是什么；见下文。

Q2：“选择 B->D 列中的所有内容”

A2: select * from [Sheet1$B:D]

Q3: '选择 B12:D*' where *意思是“你能做的一切”

A3：从[Sheet1$B12:D]中选择*

使用以下代码使用 Python 2.5 进行测试：

import win32com.client
import sys
filename, sheetname, range = sys.argv[1:4]
DSN= """
    PROVIDER=Microsoft.Jet.OLEDB.4.0;
    DATA SOURCE=%s;
    Extended Properties='Excel 8.0;READONLY=true;IMEX=1';
    """ % filename
conn = win32com.client.Dispatch("ADODB.Connection")
conn.Open(DSN)
rs = win32com.client.Dispatch("ADODB.Recordset")
sql = (
    "SELECT * FROM [Excel 8.0;HDR=NO;IMEX=1;Database=%s;].[%s$%s]"
    % (filename, sheetname, range)
    )
rs.Open(sql, conn)
nrows = 0
while not rs.EOF:
    nrows += 1
    nf = rs.Fields.Count
    values = [rs.Fields.Item(i).Value for i in xrange(nf)]
    print nrows, values
    if not any(value is not None for value in values):
        print "sentinel found"
        break
    rs.MoveNext()
rs.Close()
conn.Close()