Page 1 of 1

new bug xBrowse ToExcel()

Posted: Wed Jan 01, 2020 1:56 pm
by MOISES
Event description: (DOS Problem -2147352567) WINOLE/1007 No se puede obtener la propiedad Paste de la clase Worksheet. (0x800A03EC): Microsoft Excel

Stack Calls
===========
Called from: => TOLEAUTO:PASTE( 0 )
Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:TOEXCEL( 9880 )
Called from: .\source\function\XBROWSER.PRG => (b)XBROWSE( 176 )

Lines source\classes\xbrowse.prg

Code: Select all

                  if Len( cText ) > 16000
                     ::oClp:SetText( cText )
                     oSheet:Cells( nPasteRow, 1 ):Select()
         here->            oSheet:Paste()
Thank you.

Re: new bug xBrowse ToExcel()

Posted: Wed Jan 01, 2020 6:08 pm
by driessen
Hallo,

It looks to me a OLE problem within your Office.
Try to run a repair of your Office.

Re: new bug xBrowse ToExcel()

Posted: Wed Jan 01, 2020 6:56 pm
by MOISES
Thank you.

In the same PC, export to Excel in Report works perfect.

Also, a TRY/CATCH error control is missing.