Помогите с Excel

← →
TBase_Tree (2008-06-02 12:57) [0]

Здравствуйте! Подскажите как получить шрифт ячейки ?

Ex := CreateOleObject("Excel.Application");
Ex.Visible := False;
Ex.DisplayAlerts := False;
Ex.WorkBooks.Open(ExtractFilePath(Application.ExeName) + "Excel.xls");
Ex.WorkSheets[1].Activate;

Так я получаю текст ячейки:

Ex.Cells[i, 2];

← →
TBase_Tree (2008-06-02 12:58) [1]

Т.е шрифт текста ...

← →
Anatoly Podgoretsky © (2008-06-02 13:05) [2]

Нет шрифта у ячейки и у текста, это понятие для каждого конкретного символа отдельно, никто не мешает сделать их разными для каждого символа.

← →
Palladin © (2008-06-02 13:06) [3]

в ячейке текст может быть нескольких шрифтов, тебе какой?

← →
TBase_Tree (2008-06-02 13:26) [4]

Мне нужен шрифт ячейки допустим Ex.Cells[i, 2], шрифт текста т.е Font.Size -
Это можно определить ?

> никто не мешает сделать их разными для каждого символа.

В моем случаи такого не будет. У меня есть список фамилий в столбце А, некоторые фамилии 9-го шрифта некоторые 15-го.

← →
Palladin © (2008-06-02 13:31) [5]

> В моем случаи такого не будет.

не важно, будет в твоем случаи такого или нет, факт в том, что нужно тебе смотреть справку Excel VBA на предмет Font...

← →
TBase_Tree (2008-06-02 13:37) [6]

> не важно, будет в твоем случаи такого или нет, факт в том,
> что нужно тебе смотреть справку Excel VBA на предмет Font.
> ..
>

Я читал, но научился только выгружать с определенным шрифтом а не считывать, по этому обращаюсь к вам за помощью :(

← →
Anatoly Podgoretsky © (2008-06-02 13:39) [7]

> TBase_Tree (02.06.2008 13:37:06) [6]

Обращаться надо к Микрософту, это не Дельфи.

← →
TBase_Tree (2008-06-02 13:45) [8]

> Обращаться надо к Микрософту, это не Дельфи.

Тогда прошу перенести топик во флейм. Создавал тему надеясь что из программистов с богатым опытом кто-то уже сталкивался с данной проблемой, из тех кто смог бы подсказать ...

← →
Palladin © (2008-06-02 13:47) [9]

> TBase_Tree (02.06.08 13:45) [8]

поверь, я с этим никогда несталкивался, но за 5 минут записал макрос и посмотрел, что же творится... чего ты плачешься? сам этого сделать не можешь? и опыт тут ни причем...

← →
TBase_Tree (2008-06-02 13:53) [10]

> поверь, я с этим никогда несталкивался, но за 5 минут записал
> макрос и посмотрел, что же творится... чего ты плачешься?
> сам этого сделать не можешь? и опыт тут ни причем...

Конференция для начинающих ведь, для тех кто даже вопрос сформулировать не может. И я зашел сюда не от того что мне лень думать ... А от того что в первые работаю с офисом из дельфи, а программирую только 8 мес. Но все равно спасибо, сейчас буду пробовать записать макрос.

> TBase_Tree (02.06.2008 13:53:10) [10]

Как начальный старт посмотри статьи на Королевстве, но только как старт, а для работы все равно надо лезть на Микрософт.

← →
TBase_Tree (2008-06-02 14:08) [12]

> Как начальный старт посмотри статьи на Королевстве, но только
> как старт, а для работы все равно надо лезть на Микрософт.

Сенкс.

← →
TBase_Tree (2008-06-02 14:31) [13]

Кому интересно, решил след.способом:

Ex.Cells[i, 2].Activate;
ShowMessage(Ex.Selection.Font.Size);

Помогите с Excel Найти похожие ветки