Экспорт в Excel - поле формата "Дата"

[Ned]

Всем привет!
Ситуация: программно создаю ExcelWorkbook, нахожу ячейку, далее
Cell.value2( SystemDateGet());
Cell.numberFormat( "
Далее мысль обрывается...
Никто не сталкивался с форматированием даты?

[Vadik]

Гораздо лучше будет сначала форматировать ячейку, а потом ей значения присваивать. Это раз.

Два. В чем проблема? В строке формата? Мне "dd.mm.yy" больше всего нравится.

[LTA]

Для экспорта в Excel можно использовать класс ComExcelDocument_RU, который берет на себя выполнение простых операций с Excel

[Ned]

дописываем:
Cell.numberFormat("dd.mm.yy");
Cell.value2(SystemDateGet());
на выходе - "dd.mm.yy" вместо самой даты

[Ned]

to LTA: я его и использую.
Интересуют две простые операции:
1. Назначение цвета фона для ячейки - Cell.Interior().color() - почему-то ячейки перекрашиваются в радикальный чёрный цвет
2. Форматирование даты - вылетает по ошибке.

[Vadik]

А зачем Value2?

Все уже читали про SysExcelImport, но у меня очень долго жил в другом приложении код, который бегал по рекордсету и в зависимости т типа поля формировал NumberFormat и присваивал Value, и все как-то жило.

Цитата:

на выходе - "dd.mm.yy" вместо самой даты

В аксапте лень проверять, но в VBA

Sub test()
ActiveCell.NumberFormat = "dd.mm.yy"
ActiveCell.Value2 = Now
ActiveCell(2, 1).Activate
ActiveCell.NumberFormat = "dd.mm.yy"
ActiveCell.Value = Now
End Sub

все работает

[Ned]

Ну-ну...
В VBA мы все мастера - и copyFromRecordset сделаем и сводную таблицу сляпаем.


Но при запуске Excel как сервер автоматизации выясняется, что не все методы выглядят так же, как и в VBA.

[Vadik]

Ну-ну

Цитата:

В VBA мы все мастера - и copyFromRecordset сделаем и сводную таблицу сляпаем

Стыдно конечно признаваться, но я ни разу не делал сводной таблицы И copyFromRecordset - тоже ни разу

Что касается цвета

COMCell = COMAppl.activecell();
COMInterior = COMCell.Interior();
COMInterior.Color(WINAPI::RGB2int(255,0,0));

Оно таки красное

Что касается нелюбимого Вами VBA:

если запустить

MsgBox ActiveCell.NumberFormat
MsgBox ActiveCell.NumberFormatLocal

стоя на ячейке, в которой присваивание даты свалилось, видно, что
NumberFormat забит слэшами, которых там быть не должно

[Ned]

За цвет спасибо!
По поводу сабжа - пришлось сдаться:
Cell.value2(strfmt(" %1",PLine.EXWDate));

[dn]

вместо Cell.numberFormat("dd.mm.yy") попробуй
Cell.numberFormatLocal("ДД.ММ.ГГ")

[Ned]

Насчёт NumberFormatLocal - спасибо действительно работает. Непонятно, почему не работает NumberFormat. И вообще - может быть существует более производительный способ вывода данных в Excel, чем через аутомэйшен по ячейкам?

[dn]

Похоже это глюки в реализации com-сервера Еxcel, в Delphi всё аналогично.
(хотя к VB это не относится).
Более производительно передавать данные через вариантный массив в выбранный range. В Axapta не пробовал, а в Delphi выглядит примерно так:

var ArrayData: Variant;
...
ArrayData := VarArrayCreate([1, 10, 1,10]);
// fill array
for I := 1 to 10 do
for J:= 1 to 10 do
ArrayData[I,J]:= ... ;
....
Range[ Cells.Item[1,1], Cells.Item[10,10] ].Value := ArrayData;

[Ned]

За массив опять спасибо. В аксапте тоже получилось:
doc.findRange(strfmt("A%1:",Num) + COMExcelDocument_RU::numToNameCell(Arr.lastIndex(),Num)).value2(
COMVariant::createFromArray(Arr));
Скорость вывода увеличилась в разы.

[Buba]

Если не трудно, нельзя ли отобразить весь код по вставки значений в Excel из массива (с описанием Num и Arr)

[Yury]

А заодно подскажите, как узнать, какие свойства и методы (и какая сигнатура методов) есть у какого-либо Com - объекта

[Lazy_Tiger]

в tlb, exe, dll файлике подглядеть, type library editor'ом.