But your solution about export to excel is excellent

Thanks very much for your engagement in my problem.
Best regards, Marek
Moderator: Rathinagiri
function CopyToClipboard
param cTekst
#define HB_GTI_CLIPBOARDDATA 15
hb_gtInfo( HB_GTI_CLIPBOARDDATA, cTekst )
return
private xlCalcStatus
// xlCalcStatus - for restoring status after export to excel
#define xlManual -4135
xlCalcStatus := oExcel:Calculation
oExcel:Calculation := xlManual
// ^^^^^^^
// put your export code here
// and now restore settings
oExcel:Calulation := xlCalcStatus
// and I think, it's good idea for recalculating sheet after export
oExcel:Calculate()
Code: Select all
oExcel:Calulation := xlManual