我知道您说过要避免使用VB,但是对于您想做的事情并不太复杂。
您可以让工作表的组名称具有一个单元格,然后有一个调用宏的按钮,您可以在其中更改sql查询以针对group_id进行调整。
就像是:
Dim sql As Stringsql = "select ... from ... and sec.GROUP_ID = '?'"sql = Replace(sql, "?", Worksheets("Analysis").Range("A1").Value)With ActiveWorkbook.Connections("connection name").OLEDBConnection .CommandText = sql .RefreshEnd With在哪里:
Worksheets("Analysis").Range("A1").Value是Group_ID。您可以将其设置为工作簿中任何工作表中的特定单元格。我将在其旁边创建一个名为“刷新表”或类似名称的按钮。
如果您已经制作了一个链接到数据库的表,则Excel中有一个连接对象。转到“数据”选项卡,然后单击“连接”。将会弹出一个新窗口。查找与SQL查询匹配的连接。单击该连接,然后单击“属性”,然后将连接名称更改为简单的名称(根据您连接到的服务器/表,它通常是一个长名称)。用它来
ActiveWorkbook.Connections("connection name")部分。
链接到工作表上的创建按钮并链接到宏:
http://office.microsoft.com/zh-CN/excel-help/add-a-button-and-assign-a-macro-
to-it-in-a-worksheet-HP010236676.aspx



