ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   VBA Excel 2007 SQL query (https://www.excelbanter.com/excel-programming/424967-vba-excel-2007-sql-query.html)

Striker

VBA Excel 2007 SQL query
 
I'm trying to query a SQL database and bring the results to a spreadsheet.
Be gentle on my, I have not coded in VBA for many years.

I'm thinking I can open a connection lke this
Set MyConnection = new ADODB.connectio0n
MyConnection.Open "Driver=SQL
Server;Server=MyServerName;Database=MyDatabase; (not sure I need a
password)

So question is how do I run a SQL query? I have only used this to add stuff
to a database before?



Nigel[_2_]

VBA Excel 2007 SQL query
 
Turn on the macro recorder, then tab to DATA and set up your connection
'From other sources', and query options. Turn off recorder and you will have
a skeleton code that you can adapt for general use.

--

Regards,
Nigel




"Striker" wrote in message
...
I'm trying to query a SQL database and bring the results to a spreadsheet.
Be gentle on my, I have not coded in VBA for many years.

I'm thinking I can open a connection lke this
Set MyConnection = new ADODB.connectio0n
MyConnection.Open "Driver=SQL
Server;Server=MyServerName;Database=MyDatabase; (not sure I need a
password)

So question is how do I run a SQL query? I have only used this to add
stuff to a database before?



Striker

VBA Excel 2007 SQL query
 
I can see the fframework, but not sure where to put a query in there?


"Nigel" wrote in message
...
Turn on the macro recorder, then tab to DATA and set up your connection
'From other sources', and query options. Turn off recorder and you will
have a skeleton code that you can adapt for general use.

--

Regards,
Nigel




"Striker" wrote in message
...
I'm trying to query a SQL database and bring the results to a
spreadsheet. Be gentle on my, I have not coded in VBA for many years.

I'm thinking I can open a connection lke this
Set MyConnection = new ADODB.connectio0n
MyConnection.Open "Driver=SQL
Server;Server=MyServerName;Database=MyDatabase; (not sure I need a
password)

So question is how do I run a SQL query? I have only used this to add
stuff to a database before?





Dick Kusleika[_4_]

VBA Excel 2007 SQL query
 
On Tue, 3 Mar 2009 07:08:25 -0700, "Striker" wrote:

I'm trying to query a SQL database and bring the results to a spreadsheet.
Be gentle on my, I have not coded in VBA for many years.

I'm thinking I can open a connection lke this
Set MyConnection = new ADODB.connectio0n
MyConnection.Open "Driver=SQL
Server;Server=MyServerName;Database=MyDatabase; (not sure I need a
password)

So question is how do I run a SQL query? I have only used this to add stuff
to a database before?


Dim rs As ADODB.Recordset
Dim sSQL As String

sSQL = "SELECT * FROM MyTable WHERE ID=1"

Set rs = MyConnection.Execute(sSQL)

More info here
http://www.dailydoseofexcel.com/arch...set-basics/%5C
--
Dick Kusleika
Microsoft MVP-Excel
http://www.dailydoseofexcel.com

Striker

VBA Excel 2007 SQL query
 
VBA does not seem to like the line continuation _. If I put my query on one
line 600 spaces long it works, but the query is hard to read that way.



"Dick Kusleika" wrote in message
...
On Tue, 3 Mar 2009 07:08:25 -0700, "Striker"
wrote:

I'm trying to query a SQL database and bring the results to a spreadsheet.
Be gentle on my, I have not coded in VBA for many years.

I'm thinking I can open a connection lke this
Set MyConnection = new ADODB.connectio0n
MyConnection.Open "Driver=SQL
Server;Server=MyServerName;Database=MyDatabase ; (not sure I need a
password)

So question is how do I run a SQL query? I have only used this to add
stuff
to a database before?


Dim rs As ADODB.Recordset
Dim sSQL As String

sSQL = "SELECT * FROM MyTable WHERE ID=1"

Set rs = MyConnection.Execute(sSQL)

More info here
http://www.dailydoseofexcel.com/arch...set-basics/%5C
--
Dick Kusleika
Microsoft MVP-Excel
http://www.dailydoseofexcel.com




All times are GMT +1. The time now is 11:26 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com