Question

我有把SQL Server数据带到Excel的问题。

所以任何人都可以帮我解决如何连接到SQL Server以使用vba宏？以及如何使用vba脚本将SQL查询到Excel电子表格？

感谢。

Answer 1

在Office 2007中，转到数据标签，然后获取外部数据，您将看到连接到SQL的选项，并在2010年转到数据选项卡并单击其他现有来源，然后选择 SQL Server 。这是将数据拉入工作表以直接操作。

仅限VBA

在VBA脚本编辑器中包含 ActiveX数据对象参考

以下是有关如何从VBA连接SQL的代码示例

Sub Connect2SQLXpress()
Dim oCon As ADODB.Connection
Dim oRS As ADODB.Recordset
Set oCon = New ADODB.Connection
oCon.ConnectionString = "Driver={SQL Native Client};Server=.\SQLEXPRESS;Database=DB1; Trusted_Connection=yes;"
oCon.Open
Set oRS = New ADODB.Recordset
oRS.ActiveConnection = oCon
oRS.Source = "Select * From Table1"
oRS.Open
Range("A1").CopyFromRecordset oRS
oRS.Close
oCon.Close
If Not oRS Is Nothing Then Set oRS = Nothing
If Not oCon Is Nothing Then Set oCon = Nothing
End Sub

要在Excel中启用Visual Basic编辑器，请阅读以下link以启用“开发人员”选项卡

这应该可以快速概述您的需求。

SQL查询excel电子表格使用vba宏

1 个答案: