Hi Ken
Have a try with this, using ADO :
Sub TEST()
'this requires to make a ref via tool
'to Microsoft ActiveX Data Object 2.x

Dim cn As ADODB.Connection
Dim rec As ADODB.Recordset

Set cn = New Connection
Set rec = New Recordset
'open the connection
cn.Open "Provider=SQLOLEDB.1;Data Source=GOOBER", "userID", "password"
'open the recordset
rec.Open "select CreatedDate from Jeff where InvoiNumber= '" & Range("A1") &
"';", cn, adOpenForwardOnly, adLockOptimistic

Do While rec.EOF = False
Range("a2") = rec.Fields("CreatedDate").Value
'or to copy an entire recorset
'Range("A1").CopyFromRecordset rec
'optional for multiple records
'rec.MoveNext
Loop

rec.Close
cn.Close
Set rec = Nothing
Set cn = Nothing
End Sub
Regards
JY

"Ken" wrote in message
...
Hello.
I'm trying to figure out exactly how to use VBA to look at the contents of
a
cell, then query a SQL server using that data and return results to
several
other cells.

My server name is Goober and the table I want to pull the data from is
Jeff.
In ODBC, I have the Server connection called Testing

basically I need to look at the contents of cell A1, and then run a
statement that does the following:
Output to cell A2 the results of the SQL query
select CreatedDate from Goober..Jeff where InvoiceNumber = (Cell A1)
Output to cell A3 the results of the SQL query
select CreatedByUser from Goober..Jeff where InvoiceNumber = (Cell A1)

I'm well versed in SQL, but I am a VBA novice, so I don't know how to set
up
my connections (with VBA code) or what the difference is between ADO and
DAO,
so could you please include that in your answer? Also, I'd need to know
if I
need to set any References.

Thanks!
Ken