Aquí te va un pequenho código
Dim dbXLS As Database
Dim tbXLS As Recordset
Dim sqlXLS as String
Screen.MousePointer = 11
PoneMensaje "Activando Fichero Prueba.XLS"
'Abre tabla de la hoja de trabajo Microsoft Excel externa.
If Mid$(App.Path, Len(App.Path), 1) = "\" Then
sqlXLS = App.Path + "prueba.xls"
Else
sqlXLS = App.Path + "\" + "Prueba.xls"
End If
' Abro el Libro Prueba XLS como Database
Set libMPP = OpenDatabase(sqlXLS, False, False, "EXCEL 5.0;")
'Crea Recordset a partir de la hoja de trabajo Hoja con un Area definida como BasePrueba.
Set hojMPP = libMPP.OpenRecordset("BaseMPP")
hojMPP.MoveFirst
' leyendo los valores de la columna uno dos y tres que tienen en su encabezado los nombres
' Enero, Febrero, Marzo
Do While Not hojMPP.EOF
a=hojMPP!Enero
b=hojMPP!Febrero
c=hojMPP!Marzo
hojMPP.MoveNext
Loop
hojaMpp.Close
libMPP.Close
Espero esto te ayude cualquier dudas quedo a la espera
sld Ariel
de3_cad_var@melia.solmelia.cma.net
-----Mensaje original-----
De: Alessandria, Gabriel [SMTP:galessan@apsf.com.ar]
Enviado el: lunes 24 de agosto de 1998 16:49
Para: 'vb-esp@ccc.uba.ar'
Asunto: (VB-ESP) Integracion con EXCEL desde VB
Por favor, alguien me puede enviar un ejemplo de codigo de como
hacer para desde visual basic leer una planilla de excel, recorrerla,
etc ?
Gracias desde ya a todos los listeros !!
Gabriel Alessandria
Santa Fe - Argentina