Buenas, ante todo gracias por leer este email, me gustaria 
saber si e sposible cargar una especia de recorset (sin 
ser una matriz) sin que exista una base de datos es decir 
en memoria,poderte crear los camnpos y llenarlos de 
contenido. Todo esto viene porque tengo una hoja de excel 
y quiero cargar su contenido en un grid que esta en un 
formulario dentro de la propia hoja. A alguien se le 
ocurre algo???..


RESPONDE VIGON
==============

Puedes utilizar un Recordset desconectado de ADO; ahí va un ejemplo:

'----- Declarar el Recordset, definir sus campos y abrirlo
Dim Rs As ADODB.Recordset
Set Rs = New ADODB.Recordset
Rs.Fields.Append "Descripcion", adVarChar, 20
Rs.Fields.Append "Precio", adCurrency
Rs.Open , Nothing
'----- Agregar algunos registros
Rs.AddNew Array("Descripcion", "Precio"), Array("Tornillo", 0.75)
Rs.AddNew Array("Descripcion", "Precio"), Array("Tuerca", 0.65)
Rs.AddNew Array("Descripcion", "Precio"), Array("Clavo", 0.35)
'----- Recorrer el recordset y mostrar los registros
Rs.MoveFirst
While Not Rs.EOF
    MsgBox "Descripción: " & Rs!Descripcion & vbCrLf & "Precio: " & FormatCurrency(Rs!Precio)
    Rs.MoveNext
Wend
'----- Cerrar el Recordset
Rs.Close
Set Rs = Nothing




''''otra forma alternativa
Set rsRecordset = New Recordset
    With rsRecordset
        .Fields.Append "ID_Pelicula", adInteger, 4
        .Fields.Append "Titulo", adVarWChar, 120
        .Fields.Append "Categoria", adVarWChar, 50
        .Fields.Append "Fecha", adDate, 8
        .Fields.Append "Monto", adCurrency, 8
        .Fields.Append "Cantidad", adInteger, 4
        .Fields.Append "Estreno", adBoolean, 2
        .Open
        
    End With
    'AQUI OPERA YA CON EL RECORDSET.....