| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Млин, все тот же Excel...
Aleksandr © (2001-12-24 18:11:00)Тут за такие вопросы посылали... к поиску. Вот кто посылал, тот пусть и посмотрит, как поиск ищет. Столбец уже удаленных мессагов, и усе, а остальное не в счет.
А проблема такая:
Заполняю я таблицу Эксель данными, по ходу форматируя их...
var
Range : TExcel97.Range;
ExApp : TExcelApplication;
...
Range.Value:=he_Type;
Range:=Range.Next;
Range.Value:=he_Country; ...//тексты вошли, порядок
ExApp.Range["A1",TExcelLetters[8]+IntToStr(Row)].Font.Italic:=true; //шрифт италиком стал, тоже ок.
ExApp.Range["A1",TExcelLetters[8]+IntToStr(Row)].Font.Color:=he_FontColor; //шрифт закрасился, тоже ок.
ExApp.Range["A1",TExcelLetters[8]+IntToStr(Row)].Font.BackGround:=he_Color; //вот тут облом. Говорит, что не может выполнить это дело...
Вопрос: А как тогда заливку сделать?
Aleksandr (2001-12-24 20:08:00) [1]может, тогда заодно фрагмент макроса для того, чтобы этот драный эксель строки типа "16:00" не преобразовывал, дашь?
Digitman (2001-12-24 18:52:00) [2]Как залить опред.цветом - я тебе фрагмент макроса дал. Макрос-то и сам бы записать мог да посмотреть, как это сам Excel делает. При чем здесь хэлп ? Долго что ли VBA в Pascal переделать ?
Aleksandr (2001-12-24 18:48:00) [3]Ну нету у меня VBA Help... Вопрос-то в том, как фон залить все-таки...
Digitman (2001-12-24 18:46:00) [4]Зато, если бы ты VBA help почитал, увидел бы, что возможные значения св-ва Range[..].Font.Background :
xlBackgroundAutomatic, xlBackgroundOpaque, xlBackgroundTransparent
и никаких he_Color там и в помине нет)
Aleksandr (2001-12-24 18:40:00) [5]2 Digitman
Зато у ExcelApplication.Range.Font есть пропертя BackGround, не так ли?
Digitman (2001-12-24 18:21:00) [6]With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
этот работающий фрагмент Excel-макроса, изменяющего цвет заднего плана, тебе говорит о чем-нибудь ? Есть ли здесь хоть какое-то упоминание о Font.Background ?
| |
