源程序如下:
for i:=1 to RecordCount do
begin
CellChrX:=IntToStr(I+4);
CellChrY:=CellChrX;
CellX:='A'+ CellChrX;
CellY:=CellX;
With EWS.Range[CellX,CellY] do
begin
NumberFormatLocal := '¥#,##0.00;¥-#,##0.00';
FormulaR1C1 := FieldValues['VOL'] ;
这样显示出来的是VOL单占一个单元格,但如果数据较大时就会显示为#######,还要手工拖动才能正确显示,哪位高手有教于我怎样作才能让VOL占两个单元格?小弟不胜感激!!!