Показать сообщение отдельно
Старый 11.06.2010, 12:13   #18  
Gustav is offline
Gustav
Moderator
Аватар для Gustav
SAP
Лучший по профессии 2009
 
1,858 / 1152 (42) ++++++++
Регистрация: 24.01.2006
Адрес: Санкт-Петербург
Записей в блоге: 19
Как-то так? Выделяется 10 первых строк:
X++:
{
    Form                form = new Form();
    Args                args = new Args();
    FormRun             formRun;
    FormActiveXControl  ss;

    COM                 worksheet;
    COM                 range;
    COM                 cells;
    ;

    form.addDesign('Design');
    args.object(form);

    formRun = classFactory.formRunClass(args);
    formRun.init();
    formRun.design().caption('Табличный процессор');

    ss = formRun.design().addControl(FormControlType::ActiveX, 'Spreadsheet');
    ss.className('{0002E541-0000-0000-C000-000000000046}');     // Microsoft Office Spreadsheet 10.0
    //ss.className('{0002E559-0000-0000-C000-000000000046}');   // Microsoft Office Spreadsheet 11.0

    ss.heightMode(FormHeight::ColumnHeight);
    ss.widthMode(FormWidth::ColumnWidth);

    range = ss.Range("A1");
    worksheet = range.Parent();
    cells = worksheet.Cells();
    range = ss.Range(cells.Item(1,1),cells.Item(10,10)); // ЭТО???
    range = range.EntireRow();
    box::info(range.Address(true,true,-4150)); // R1:R10
    range.Select();

    formRun.run();
    formRun.wait();
}
За это сообщение автора поблагодарили: Serg (1).