Как изменить шрифт в 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]

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

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