Code: Select all
'Open a new Excel file and add a sheet so that there are two sheets in the workbook (Sheet1 and Sheet2). Save and adjust %path. Save this code as prg-file and run.
WfCreate(wf = PageSavetest, Page = A) A 1980 2030
%path = "c:\Temp\skrivtest\test.xlsx"
Series xx = @Rnorm
Series yy = @Rnorm
series zz = @Rnorm
PageSave(t=excelxml,Mode=Update,noid) %path nonames Range="Sheet1!A1" byrow @keep xx yy 'works (>=2 vars)
'PageSave(t=excelxml,Mode=Update,noid) %path nonames Range="Sheet1!A1" byrow @keep xx 'NOT working (<2 vars)
'PageSave(t=excelxml,Mode=Update) %path nonames Range="Sheet1!A1" byrow @keep xx 'works (<2 vars, not using noid)
'PageSave(t=excelxml,Mode=Update,noid,legacy) %path nonames Sheet1="Blad1!A1" byrow @keep xx 'works (<2 vars, using legacy)
PageCreate(page = U) u 1
Alpha aa = "2026-02-05 13:37"
Alpha bb = "zzzz"
Alpha cc = "xxxx"
PageSave(t=excelxml,Mode=Update,noid) %path nonames Range="Sheet2!A1" byrow @keep aa bb 'works (>=2 vars)
'PageSave(t=excelxml,Mode=Update,noid) %path nonames Range="Sheet2!A1" byrow @keep aa 'NOT working (<2 vars)
'PageSave(t=excelxml,Mode=Update) %path Range="Sheet2!A1" byrow @keep aa 'NOT working (<2 vars, not using noid and/or nonames still causes crash)
'PageSave(t=excelxml,Mode=Update,noid) %path nonames Range="Sheet2!A1" @keep aa 'works (<2 vars, not using byrow)
'PageSave(t=excelxml,Mode=Update,noid,legacy) %path nonames Range="Sheet2!A1" byrow @keep aa 'works (<2 vars, using legacy)
'PageSave(t=excelxml,Mode=Update,noid) %path nonames Range="Sheet2!A1" byrow @keep aa aa 'NOT working (>=2 but same vars)
'PageSave(t=excelxml,Mode=Update,noid,legacy) %path nonames Range="Sheet2!A1" byrow @keep aa aa 'works (>=2 same vars, using legacy)Henrik Siverbo
Using Eviews 14 Enterprise Edition - Aug 14 2025 build on Windows 11 Enterprise, 24H2, 26100.7623
