I'm trying to just pull a single SQL 2005 table, one way, into Excel 2003.
User-defined type not defined
I have references set to both Microsoft ADO Ext. 2.8 for DDL and Security and Microsoft ActiveX Data Objects Recordset 2.8 Library
What am I doint wrong?
The below VBA is in the Workbook Open event in "ThisWorkbook". It's a newly created Excel worksheet with nothing but this code in it and the references I mentioned added from "Tools|References".
Private Sub Workbook_Open()
'This was set up using Microsoft ActiveX Data Objects version 2.8 (In Microsoft Visual Basic, select Tools, References)
Dim cnt As ADODB.Connection
Dim rst As ADODB.Recordset
Dim stSQL As String
Dim wbBook As Workbook
Dim wsSheet As Worksheet
Dim rnStart As Range
Const stADO As String = "Provider=SQLOLEDB.1;Integrated Security=SSPI; " & _
"Persist Security Info=False; " & _
"Initial Catalog=CustomerComplaints; " & _
Set wbBook = ActiveWorkbook
Set wsSheet = wbBook.Worksheets(1)
Set rnStart = .Range("B2")
stSQL = "SELECT * FROM Complaints ORDER BY Location, DateReceived"
Set cnt = New ADODB.Connection
.CursorLocation = adUseClient
.CommandTimeout = 0
Set rst = .Execute(stSQL)
'Here we add the Recordset to the sheet from A1
Set rst = Nothing
Set cnt = Nothing