Формат данных в Excel

← →
wowik_cn (2003-04-24 09:50) [0]

Создаю формы в Excel, но не могу часть данных завести как числа.
Готовые данные не суммируются, хотя в свойстве ячеек стоит, что они числа:

// объявление
TableVals : Variant;
LineCounter,queSelectRecCount,queSelectFieldsCount : Integer;

// заполнение массива из Query
// где нужно символы
TableVals[LineCounter, i+1] := Fields[i].AsString;
// или числа
TableVals[LineCounter, i+1] := Fields[i].Asfloat;

// присвоение ячейкам формата
xl.Range["D5:G"+inttostr(queSelectRecCount+(5-1))]:=$FFFFEFCF; //xlNumber;
xl.Range["D5:G"+inttostr(queSelectRecCount+(5-1))].Numberformat:="0.00";

// запись массива в Excel
XL.Range[XL.Cells[5,1],XL.Cells[queSelectRecCount+(5-1),queSelectFieldsCount+1]].Value := TableVals;

Где проблема? подскажите плиз.

← →
Zz_ (2003-04-24 09:51) [1]

Numberformat:="0"+DecimalSeparator+"00";

← →
wowik_cn (2003-04-24 16:10) [2]

Проблема не решилась таким способом ( Zz_). :(

← →
Dms (2003-04-24 16:14) [3]

0,00

← →
ProgMan (2003-04-24 17:21) [4]

ИМХО, глючит Excel
Я с таким сталкивался при импорте из csv в 2000.
Excel начинает понимать ячейки как числа после входа в них для редактирования (даже если ничего не менял) и выхода.

← →
wowik_cn (2003-04-25 17:16) [5]

Вот интересно - как заношу по одному значению в ячейки - к примеру XL.Cells[5,5].value:=strtofloat("1,03") - так все пучком, как только массив заливаю, так такая беда.
-
Dms - это не помогает...
-
ProgMan - ну и что прикажете делать? (как бы в раздумии)

← →
ProgMan (2003-04-25 17:22) [6]

Я эту беду победил массовым прибалением 0.
Если не слабо формулы залить, попробуй.

← →
Dms (2003-04-25 17:54) [7]

у меня был такой рабочий код. попробуй сделать так же, т.е. через VARIANT
XL.Workbooks[1].Worksheets[1].Cells[SNum,5]:=DM.tablePLIST.FieldByName("PRICE").AsVariant;

Формат данных в Excel Найти похожие ветки