oBrw:ToExcel() provoca un error ( SOLUCIONADO )

[CARLOS ATUNCAR]

Saludos tengo este problema al usar ToExcel() del xBrowse alguna solución

Application
===========
Path and name: C:\CaSoftSystem\WinContaPro\WinConta.Exe (32 bits)
Size: 9,424,384 bytes
Compiler version: xHarbour 1.3.0 Intl. (SimpLex) (Build 20230914)
FiveWin version: FWH 20.12
C compiler version: Borland/Embarcadero C++ 7.6 (32-bit)
Windows version: 6.2, Build 9200

Time from start: 0 hours 0 mins 15 secs
Error occurred at: 12/08/2024, 12:16:32
Error description: Error Excel.Application:WORKBOOKS/14 DISP_E_BADPARAMCOUNT: ADD
Args:

Stack Calls
===========
Called from: => TOLEAUTO:ADD( 0 )
Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:TOEXCEL( 10294 )
Called from: Bin\voucontable.prg => (b)MPRINT( 295 )
Called from: .\source\classes\MENU.PRG => TMENU:ACTIVATE( 1603 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 989 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONDOWN( 937 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1814 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 2051 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3559 )
Called from: => WINRUN( 0 )
Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 1097 )
Called from: Bin\Menu.prg => MAIN( 139 )

[CARLOS ATUNCAR]

Este problema no pasa con office 2016 pero con la version de office 2021 si pasa revisando el xbrowse.prg el problema esta en esta parte


if ( oExcel := ExcelObj() ) == nil
lExcelInstl := .f.
if lCalcInstl == .f.
MsgAlert( FWString( "Excel not installed" ), FWString( "Alert" ) )
return Self
else
return ::ToCalc( bProgress, nGroupBy, , , aCols )
endif
endif
lExcelInstl := .t.

if nxlLangID == nil
SetExcelLanguage( oExcel )
endif

oExcel:ScreenUpdating := .f.
oExcel:WorkBooks:Add()
oSheet := oExcel:ActiveSheet

[karinha]

https://forums.fivetechsupport.com/viewtopic.php?f=3&t=36534&p=217972&hilit=office+2016&sid=d887ee48c42a639d4be828319c6b7b3e&sid=554b2e335a1da9df5d4138768c4e990f#p217972

Regards, saludos.

[CARLOS ATUNCAR]

Este problema se presenta cuando el windows tiene actualizaciones pendientes de instalación una vez instaladas se soluciona el problema