Как изменить шрифт в excel [Delphi, Windows]
pavel_guzhanov © (2006-03-29 13:26:00)
Для создания отчета использую ексель. делаю так:
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:00) [1]
Нашел в факе, разобрался, спасибо
Наверх 
ЧАТ |
Орешник |
|
