Tengo que consultar datos de una hoja de excel y tras buscar en varios sitios he probado de la siguiente forma:
Dim mixl As Object
Set mixl = GetObject("f:\tarifa\Tarifas Serviempresa 2005.xls")
mixl.application.Visible = True
mixl.Parent.windows(1).Visible = True
Set mixl = GetObject("f:\tarifa\Tarifas Serviempresa 2005.xls")
lista_catalogo.List(1) = mixl.Worksheets(1).Range("I" & 4320).Value
Esto es para para extraer el dato de la celda I4320 (existe en mi hoja) de la hoja 1 y me da el error 381 (el indice de la matriz de propiedades no es valido).
Tambien he probado cambiando la ultima linea por la siguiente:
lista_catalogo.List(1) = mixl.Worksheets(1).Cells(4320, "I").Value
y me da el mismo error. ¿Como puedo resolver este error?
¿Podria extraer los datos median odbc con sonsultas sql?
Ayuda por favor, urge.
Muchas gracias de antemano.