Excel
Publicado por MIRNA (10 intervenciones) el 03/05/2006 05:37:15
Tengo un formulario donde exporto a excel ciertos datos, pero no quiero usar excel si no una version de prueba ASHAPOO OFICCE 2005 que contiene PLANMAKER32 que es compatible con excel para generar el archivo, pero no se como utililzarlo. Con excel agrego la referencia y creo un objeto.
Alguien me puede ayudar se lo agradeceria mucho.
este es parte del codigo:
Imports Excel
Imports pmw
'xlapl = CreateObject("excel.Application")
xlapl = CreateObject("pmw32.appication")
xlibro = xlapl.Workbooks.Add
xlhoja = xlibro.Worksheets(1)
CONTADOR = 0
For x = 1 To 18
xlhoja.Cells(1, x).Font.Bold = True
xlhoja.Cells(1, x).Font.Size = 11
xlhoja.Cells(1, x).Font.Name = "Arial"
Next
xlhoja.Range("a1").Value = "NO_RECETA"
xlhoja.Range("B1").Value = "No_AFILIAC"
Alguien me puede ayudar se lo agradeceria mucho.
este es parte del codigo:
Imports Excel
Imports pmw
'xlapl = CreateObject("excel.Application")
xlapl = CreateObject("pmw32.appication")
xlibro = xlapl.Workbooks.Add
xlhoja = xlibro.Worksheets(1)
CONTADOR = 0
For x = 1 To 18
xlhoja.Cells(1, x).Font.Bold = True
xlhoja.Cells(1, x).Font.Size = 11
xlhoja.Cells(1, x).Font.Name = "Arial"
Next
xlhoja.Range("a1").Value = "NO_RECETA"
xlhoja.Range("B1").Value = "No_AFILIAC"
Valora esta pregunta


0