В ячейку не помещаются некоторые наименования организаций. Было решено для длинных наименований по условию немного уменьшать размер шрифта.

Пытался сделать так

ШрифтВЯчейке = Шапка.Область("R3C1:R3C50").Шрифт;
Шапка.Область("R3C1:R3C50").Шрифт = Новый Шрифт(ШрифтВЯчейке,8,Истина);

Результата ноль. Пробовал по всякому, но так и не нашел ошибку. Помогите пожалуйста разобраться.

Все еще актуально...

Наверное, сперва надо вывести область, а затем шрифт менять.

(2) не мог бы ты мне немного "разжевать"?)