EXCEL y SQL

Hola!! te cuento lo q haria yo si?

Imaginemos que tenes una celda A1 donde esta la fecha.

bien:

a) me creo una macro que se conecte a SQL

ej

Set wrkodbc = CreateWorkspace("ODBCWorkspace", "admin", "", dbUseODBC)
Workspaces.Append wrkodbc

Set b = wrkodbc.OpenDatabase("VISUAL", dbDriverNoPrompt, True, "" _
& "ODBC;DATABASE=" & Db & ";UID=" & User & ";PWD=" & password & ";server=" &
server & ";DSN=VISUAL")

aca tengo un ODBC llamado Visual (con el driver de SQL)

Db = Base de Datos
User = Usuario (ej SA)
Password = clave usuario
Server = Nombre Servidor de SQL

fecha_i = format(range("a1").value,"mm/dd/yyyy HH:mm:ss")

Set r = b.OpenRecordset("select id from factura where fecha >='" fecha_i &
"'",dbopensnapshot)

if r.recordcount > 0 then

fila = 7 (empieza en la fila 7 a llenar)

r.movelast
total = r.recordcount
r.movefirst

for n = 1 to total
cells(fila,1) = r("cliente") 1 = columna
A
cells(fila,2) = r("otros campos") 2 = Columna B

r.movenext
fila = fila + 1
next


end if

b.close

Un saludo y espero q te haya sido de utilidad

Maximiliano Damian Accotto
"Jorge Alvarez" escribió en el mensaje
news:uk$

Hola Amigos:

Necesito jalar ciertos datos de una base de datos en SQL-SERVER como:

Saldo

en caja , Saldo en Bancos, Saldo de Cuentas x Cobrar y x Pagar; todo esto

a

una fecha determinada, dicha fecha se pondría en una celda y con botón
cargaria los datos automaticamente. Podrían decirme donde encuentro
información poderlo
hacer.

Muy agradecido por su atención