Экспорт в Excel, раздвигание строк

[alvares]

Может кто решал эту задачу..

Есть задача экспортировать данные в Excel в определенный шаблон.
С самим механизмом экспорта проблем нет, но шаблон предусматривает отображение строк документа, после заголовка отчета. После строк должен идти подвал, с навороченным оформлением и посторонними графическими объектами (картинками).

Так вот, чтобы красиво выводить данные из строк документа не вижу никакого способа кроме как раздвигать строки (или есть еще варианты?).. SysExcelApplication вроде такого делать не умеет, а напрямую через COM не знаю с чего подступиться

Где-то была тема где было описано как вызывать макросы в Excel книге, но это крайний вариант, так как Excel у пользователей может быть разный и по разному реагировать на макросы...

[S.Kuskov]

Quote:

Originally Posted by alvares

напрямую через COM не знаю с чего подступиться

Пару вопросов по отчетам Excel

Quote:

Originally Posted by Владимир Максимов

Чтобы уточнить синтаксис какой-либо команды непосредственно в Excel, используют встроенный в Excel макрорекодер. Т.е. запись всех действий пользователя, совершаемых в Excel. Пункт меню Сервис -> Макрос -> Начать запись.

Выполняешь все необходимые действия, далее останавливаешь запись, открываешь макрос на редактирование и смотришь, какая именно команда была использована.

[alvares]

А как передать эту команду из Х++ через COM?

В макросе написано:

Rows("14:14").Select
Selection.Insert Shift:=xlDown

С Range понятно, выделить диапазон можно и через SysExcelApplication, а как быть с Selection.Insert?

[S.Kuskov]

Quote:

Originally Posted by alvares

как быть с Selection.Insert?

Как-то так.

COM Selection;
#define.xlDown(-4121)
;

Selection = SysExcelApplication.findRange("14:14");
Selection.insert(#xlDown);

Пишу от руки. Нужно проверять...

[ivas]

\Classes\ComExcelDocument_RU\insertRow

[Corel]

Если не ошибаюсь, Excel сам может раздвигать строки, но при одном условии: ячейки не должны быть объединены. Если отчёт нарисован объединёнными "клеточками", то придётся извращаться.

[AxPr-r]

Quote:

Originally Posted by alvares

Может кто решал эту задачу..

я решил так, думаю смысл понятен

    str getBookMark(int _fromCol, int _fromRow, int _toCol, int _toRow)
    {
        return strFmt("%1:%2", ComExcelDocument_RU::numToNameCell(_fromCol, _fromRow), ComExcelDocument_RU::numToNameCell(_toCol, _toRow));
    }
    
    void setRowHeight(str _s, int _strLen, int _row)
    {
        if(strlen(_s) > _strLen)
        {
            rowHeight = strlen(_s) / _strLen + 1;
            rowHeight = 15 * rowHeight;
        }
        else
            rowHeight = #RowHeight;

        excellDocument.setRowHeight(getBookMark(1, _row, #endColumn, _row) ,rowHeight);
    }

[Gustav]

Quote:

Originally Posted by AxPr-r

я решил так, думаю смысл понятен

Смысл почти понятен, и по мере его понимания возникает вопрос к топикстартеру, что же он всё-таки имел в виду под "раздвиганием строк" - добавление новых строк или увеличение высоты имеющихся?

[alvares]

Задача была такая - вставить в середину сложного шаблона несколько строк из документа.
Соответственно, строк может быть несколько и заранее мы не знаем сколько, чтобы под это дело зарезервировать место в шаблоне...
Поэтому и нужно было раздвинуть

[alvares]

Quote:

Originally Posted by S.Kuskov

Как-то так.

COM Selection;
#define.xlDown(-4121)
;

Selection = SysExcelApplication.findRange("14:14");
Selection.insert(#xlDown);

Пишу от руки. Нужно проверять...

Этот вариант отолично работает, спасибо!

[alvares]

Где-то на форуме пробегал список Enumerations из Excel Object Model Reference,

...
#define.xlDown(-4121)

найти не могу, никто не напомнит?

[oip]

http://msdn.microsoft.com/en-us/library/ff193293.aspx