Visual Basic - Excel y MSFlexGrid

Por favor, necesito que alquien me diga como hago para cargar el contenido de un archivo de Excel en un MSFlexGrid.

Si alguien lo sabe o tiene alguna idea para hacerlo, por favor respondanme, si?.

gracias....

Este código lo utilizo con otro Flex Grid pero en teoría te debería de funcionar unicamente es un DAO hacia un archivo separado por comas, de Excel no tengo uno a la mano, pero tienes que declarar Excel como un tipo de aplicación, irte a la hoja activa y empezar a leer.
Este te p uede dar una idea.

vsfLlamadas.Rows = 2
vsfLlamadas.Clear
Set cnSQL = New Connection
strCnn = "Driver={Microsoft Text Driver (*.txt; *.csv)};Dbq=" & xFileDatos.fPath
cnSQL.ConnectionString = strCnn
cnSQL.Open
Set rs = cnSQL.Execute("SELECT * FROM [" & xFileDatos.fName & "]")
Set vsfLlamadas.DataSource = rs
rs.Close
cnSQL.Close
Set cnSQL = Nothing

Y este ejemplo de Excel es para escribir de un Flex hacia una hoja de Excel

Set objExcel = New Excel.Application
objExcel.SheetsInNewWorkbook = 1
objExcel.Workbooks.Add
objExcel.Visible = True
objExcel.SheetsInNewWorkbook = 1

Dim ContX As Integer, ContY As Integer
ContX = 0
ContY = 0

For ContX = 0 To Tabla.Rows - 1
For ContY = 0 To Tabla.Cols - 1
With objExcel.ActiveSheet
.Cells(ContX + 1, ContY + 1) = Tabla.TextMatrix(ContX, ContY)
End With
Next
Next