Ver Mensaje Individual
  #3 (permalink)  
Antiguo 19/12/2012, 18:15
Kilik
 
Fecha de Ingreso: diciembre-2012
Mensajes: 2
Antigüedad: 11 años, 5 meses
Puntos: 0
Respuesta: Escribir campos de formulario en hoja de Excel

Gracias, al final he conseguido solucionarlo haciéndolo así:

Código:
Dim oExcel As Object
    Dim oBook As Object
    Dim oSheet As Object
    
    fichero = Me![ruta_plantilla]
    
    'Start a new workbook in Excel
    Set oExcel = CreateObject("Excel.Application")
    Set oBook = oExcel.Workbooks.Open(fichero)
    
    
    'Add data to cells of the first worksheet in the new workbook
    Set oSheet = oBook.Worksheets(1)

    oSheet.Range("B1").Value = Me![Cuadro combinado18]
    oSheet.Range("B2").Value = Me![Referencia]
    oExcel.Visible = True
Lo que me lleva de nuevo a la duda que planteé en el primer post. ¿Qué diferencia hay entre crear las instancias de Excel así o como puse en el código del primer post? ¿Cuál es la forma más recomendable? Acabo de probar lo que me has dicho y así también funciona.

Gracias de nuevo.