delphi&excel (HELP)

Тема в разделе "Delphi - СОМ", создана пользователем fenix, 12 янв 2004.

Статус темы:
Закрыта.
  1. fenix

    fenix Гость

    Пипл подскажите плиз как из делфы в Excel можно обединить 2 ячейки
    с помещением текста в центре (в екселе такая кнопка есть а как из delphi это зделать)
    Зарание благодарен.
     
  2. admin

    admin Well-Known Member

    Регистрация:
    8 авг 2003
    Сообщения:
    2.811
    Симпатии:
    0
    fenix
    хммм
    А ты вообще с экселем через Delphi работал? OLE знаешь такую фичу? Можно всё просто вывести в окне делфовом и нажать кнопку.
     
  3. GERASIM FROM MINSK

    GERASIM FROM MINSK Гость

    Сам только что накопал в Инете в проекте DELPHI WORLD

    ПОКА ЕЩЕ НЕ ПРОВЕРЯЛ :)

    MerCen('A4:J4');

    Исходный код:

    var
    xls: Variant;
    const
    xlCenter = -4108;

    procedure MerCen(ran: string);
    begin
    xls.Range[ran].Select;
    xls.Selection.HorizontalAlignment := xlCenter;
    xls.Selection.VerticalAlignment := xlCenter;
    xls.Selection.WrapText:= false;
    xls.Selection.Orientation := 0;
    xls.Selection.ShrinkToFit := False;
    xls.Selection.MergeCells := False;
    xls.Selection.Merge;
    end;
     
  4. Barmutik

    Barmutik Гость

    Работает:

    Код (Text):
    ExcelApp.ActiveWorkBook.WorkSheets[1].Range['A1, 'C2'].MergeCells := True;
    Диапазон ячеек дан для примера само собой...
     
Загрузка...
Похожие Темы - delphi&excel (HELP)
  1. NekoKira
    Ответов:
    5
    Просмотров:
    1.694
Статус темы:
Закрыта.

Поделиться этой страницей