dataset en Excel

[icam]

Hola, necesito enviar datos de mi dataset a Excel.

Actualmente hago esto:

Dim oExcel As New Excel.Application
Dim oBook As Object
Dim oSheet As Object
Const sSampleFolder = "C:\ExcelData\"

oExcel = CreateObject("Excel.Application")
oBook = oExcel.Workbooks.Add
oSheet = oBook.Worksheets(1)
oSheet.Range("A1").Value = "Prueba"
'dsdatos es mi dataset
pero cuando quiero pasar mi dataset, me marca error:
Un amigo me dijo ke hiciera esto, pero me marca error de cualquier forma:

oSheet.Range("D3").Value = dsdatos.Tables(0).Rows(0)
oSheet.Range("E3").Value = dsdatos.Tables(0).Rows("nombre")

¿como le hago para imprimir mi data ser en excel?