AYUDA, VB a excel
Ojala alguien pueda ayudarme, tengo este codigo:
Dim ApplEx As Excel.Application
Dim AreaLibroEx As Excel.Workbook
Dim AreaHojaEx As Excel.Worksheet
'darle valores a los objetos excel
Set ApplEx = CreateObject("excel.application")
Set AreaLibroEx = ApplEx.Workbooks.Add
Set AreaHojaEx = AreaLibroEx.Worksheets(1)
AreaHojaEx.PageSetup.PaperSize = xlPaperDsheet
AreaHojaEx.Cells(1, 1) = Text1.Text
ApplEx.Visible = True
En la linea AreaHojaEx.PageSetup.PaperSize = xlPaperDsheet me marca un error de que no puede aplicarse la propiedad, alguien sabe como puedo configurar la hoja de excel, en serio se lo agradeceria mucho
Dim ApplEx As Excel.Application
Dim AreaLibroEx As Excel.Workbook
Dim AreaHojaEx As Excel.Worksheet
'darle valores a los objetos excel
Set ApplEx = CreateObject("excel.application")
Set AreaLibroEx = ApplEx.Workbooks.Add
Set AreaHojaEx = AreaLibroEx.Worksheets(1)
AreaHojaEx.PageSetup.PaperSize = xlPaperDsheet
AreaHojaEx.Cells(1, 1) = Text1.Text
ApplEx.Visible = True
En la linea AreaHojaEx.PageSetup.PaperSize = xlPaperDsheet me marca un error de que no puede aplicarse la propiedad, alguien sabe como puedo configurar la hoja de excel, en serio se lo agradeceria mucho
