您可以使用Excel 2010的"数据"选项卡中的Get External Data
(显示其名称),在工作簿中设置connection
以从自身查询数据.使用From Other Sources
From Microsoft Query
连接到Excel
设置好后,您可以使用VBA
来操作connection
,以查看和修改驱动查询的SQL命令.此查询引用内存中的工作簿,因此不需要保存来刷新最新数据.
下面是一个快速的Sub
来演示如何访问连接对象
Sub DemoConnection()
Dim c As Connections
Dim wb As Workbook
Dim i As Long
Dim strSQL As String
Set wb = ActiveWorkbook
Set c = wb.Connections
For i = 1 To c.Count
' Reresh the data
c(i).Refresh
' view the SQL query
strSQL = c(i).ODBCConnection.CommandText
MsgBox strSQL
Next
End Sub