Excel VBA SQL

[Rama]

Hi There,

I am a bit confused as the code stops at "SQLOpen" and
could not get around it.

Pls help



Function HKG()
DatabaseName
= "DBQ=S:\rcamatchee\donthula\FinalHongKongDatabase;DriverI
d=281;FIL=MS Access"
QueryString = "SELECT Category_Code ,
Customer_Number,Customer_Name FROM SalesData2003 WHERE
(Quantity>=2000)"
Chan = SQLOpen("DSN=" & DatabaseName)
'Chan = SQLOpen("DSN=MS Access Database" & DatabaseName)
SQLExecQuery Chan, QueryString

Set Output = Worksheets("Sheet2").Range("A1")
SQLRetrieve Chan, Output, , , True
SQLClose Chan

End Function

 

[onedaywhen]

Just stops? Do you get an error? Is the add-in loaded? Do you even
have the add-in? ...

Microsoft Knowledge Base Article - 288118
XL2002: Add-Ins That Are No Longer Included with Microsoft Excel
http://support.microsoft.com/default.aspx?scid=kb;en-us;288118

<snip>
The following add-ins are no longer included with Microsoft Excel
2002, and are not available for downloading:
• ODBC Add-in
</snip>

 

[Andy Wiggins]

Picky point, I know, but although this add-in is no longer included with
Microsoft Excel 2002 you can get it from Microsoft by following this link -
http://office.microsoft.com/downloads/2002/xlodbc.aspx

However, as far as I am aware, it is not available for Excel 2003.

--
Regards
Andy Wiggins
www.BygSoftware.com
Home of "Save and BackUp",
"The Excel Auditor" and "Byg Tools for VBA"

 

[onedaywhen]

Andy, You're just after my 'pedant of the week' award, aren't you!
Well, I'm picky too ;-)

--