Visual Basic - Excel y V.B como insertar datos desde el segundo a

Hola.
Mi cuestion es como insertar datos desde visula basic en excel en tiempo de jecucion, estoy probando pero no consigo escribir, este es el código que estoy probanso:

Dim libro As EXCEL.Workbook
Dim hoja As EXCEL.Worksheet
Set libro = GetObject("c:\vehiculos\factura.xls")
Set hoja = libro.Worksheets("hoja1")
hoja.Cells("A16") = Data1.Recordset.Fields(18).Value

Saludos, Gracias

Intentalo asi , tal vez ayude:
Dim exc As New Excel.Application
Dim Exw As Excel.Worksheet
exc.Workbooks.Open "c:\Vehiculos\Factura.xlsl"
Exw.Cells(1, 16) = Data1.Recordset.Fields(18).Value
Saludos

Intentalo asi , tal vez ayude:
Dim exc As New Excel.Application
Dim Exw As Excel.Worksheet
exc.Workbooks.Open "c:\Vehiculos\Factura.xls"
Exw.Cells(1, 16) = Data1.Recordset.Fields(18).Value
Saludos

Gracias pero no funciona

Gracias.
Pero no me funciona.
Saludos