OmnisXL / ExcelFormat : formatting cells after $populatewithlist

Nick Renders omnis1 at arcict.com
Fri Jan 26 04:29:20 EST 2018


Hi List,

I am playing around with Artsman's ExcelFormat external and I have hit a 
little snag.

Basically, what I would like to do is save an Omnis list as an Excel 
file and set the
row height and text wrap properties for all cells. So my code looks like 
this:

------------------------------------------------------------

Do lXLSBook.$initialize(kXLxlsx)

Do lXLSBook.$addformat() Returns lXLSFormat
Do lXLSFormat.$wrap.$assign(kTrue)
Do lXLSFormat.$bordertop.$assign(kXLBorderStyleDouble)     ;; ** purely 
to visualize the issue

Do lXLSBook.$populatewithlist(lList)

Do lXLSBook.$getsheet(1) Returns lXLSSheet
For lList.$line from 1 to lList.$linecount step 1
	Do lXLSSheet.$setrow(lList.$line,20,lXLSFormat)
End For

Do lXLSBook.$save(lPath)

------------------------------------------------------------


The resulting Excel file has all rows with height 20, but the lXLSFormat 
is only
applied to the cells that come after my imported list. So if lList has 3 
columns,
only column D and beyond have text wrap and a border style.

Any idea what I am doing wrong here? It works fine if I do it cell by 
cell, for
instance:

lXLSSheet.$cell(2,2).$setvalue(lXLSSheet.$cell(2,2).$value,lXLSFormat)

But that seems like a bit overkill.


Thanks,

Nick Renders



More information about the omnisdev-en mailing list