Visual Basic - AYUDA CON EXCEL PORFA, URGE!!!!

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.

Fijate de cambiar:

lista_catalogo.List(1) = mixl.Worksheets(1).Range("I" & 4320).Value

por:

mixl.Worksheets(1).Range("I" & 4320).Select

lista_catalogo.List(1) = mixl.Worksheets(1).ActiveCell.Formula1RC1

Luego si quieres, puedes grabar una macro en Excel con lo que quieres hacer y pegas el código.

Ok, lo he hecho pero ahora me dice que el objecto no admite esa propiedad o metodo

lista_catalogo.List(1) = mixl.Worksheets(1).ActiveCell.Formula1RC1

Alguna otra sugerencia porfa?

Fijate de ésta otra forma. Primero agregas la referencia a Excel a tu proyecto y luego:

Dim objExcel As Excel.Application

Set objExcel = New Excel.Application

With objExcel
.Workbooks.Open "MiPlantilla.xls"

.Range("I4230").Select
lista_catalogo.List(1) = .ActiveCell.Formula1RC1

.Save
.Visible=True
End With

Gracias pero me sigue fallando con la linea

lista_catalogo.List(1) = .ActiveCell.Formula1RC1

dice que el objeto no admite ese metodo o propiedad.

Hola, puedes usar:

lista_catalogo.List(1) = .mixl.Worksheets(1).Range("i4230").Value