Вниз
Скачать: CL | DM;

Как изменить шрифт в excel   Найти похожие ветки 

 
pavel_guzhanov ©   (2006-03-29 13:26) [0]

Для создания отчета использую ексель. делаю так:
 m_XLApp := CreateOleObject("Excel.Application");
 m_XLApp.WorkBooks.Add(-4167);
 m_XLApp.WorkBooks[1].WorkSheets[1].Name := "Список";
 Sheet:=m_XLApp.Workbooks[1].Worksheets["Список"];


Мне нужно, чтобы после создания листа шрифт на нем выставлялся "Arial Cyr", вне зависимости от того, какой шрифт стоит по умолчанию у пользователя. Попробовал сделать макрос, но не знаю, как перевести в Delphi
selected.font.name="Arial Cyr"
т.к.  появляется ошибка, что объект автоматизации не имеет свойства Selected. Подскажите, как это можно сделать


 
pavel_guzhanov ©   (2006-03-29 13:39) [1]

Нашел в факе, разобрался, спасибо



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c
15-1201840674
Ивриил
2008-02-01 07:37
2008.03.09
Может ли бог так разогреть курицу, что не сможет ее съесть?


15-1202127812
xayam
2008-02-04 15:23
2008.03.09
Проект "Россия"


2-1202666158
NaRuTo
2008-02-10 20:55
2008.03.09
Scroll


15-1201692184
Cerberus
2008-01-30 14:23
2008.03.09
А это нормально?


4-1184561505
MultIfleX
2007-07-16 08:51
2008.03.09
"Системная" панель ??




   Наверх