Форум пользователей Visio
http://visio.getbb.ru/

Font Cell
http://visio.getbb.ru/viewtopic.php?f=5&t=1315
Страница 1 из 1

Автор:  is308 [ 22 мар 2018, 12:14 ]
Заголовок сообщения:  Font Cell

Font Cell (Character Section)
Represents the number of the font used to format the text. Font numbers vary according to the fonts installed on your system. The number 0 represents the default font, which is typically Arial.

Подскажите, пожалуйста, уважаемые форумчане, как программно задать шрифт текста шейпа?
Если я правильно понял, значение в ячейке Font зависит от того, сколько шрифтов установлено у пользователя. Другими словами если задать строго числовое значение в ячейке Font, то у разных пользователей текст искомого шейпа будет написан разными шрифтами.

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

Есть возможность задать строго имя шрифта (к примеру, "Verdana")?

Автор:  is308 [ 22 мар 2018, 12:21 ]
Заголовок сообщения:  Re: Font Cell

upd: Что-то я запутался.
Открываю один документ, в котором шрифт текста шейпа (к примеру, "Gost Type A") указан в Font Cell =41
В другом документе другой шейп с таким же шрифтом уже содержит значение 68 в Font Cell.
:wall:

Автор:  god-udach [ 22 мар 2018, 12:33 ]
Заголовок сообщения:  Re: Font Cell

Описание функций Font (добавлена в 2013) и FontToID (добавлена в 2010) по-русски
Насколько я помню таких шрифтов два ttf и другое расширение
Эти гостовские шрифты для системы не родные. Возможно они в таком порядке прописались в систему

Автор:  god-udach [ 22 мар 2018, 12:42 ]
Заголовок сообщения:  Re: Font Cell

Была тема про мороку с вышеупомянутым шрифтом.
Попробуйте использовать шрифт ISOCPEUR, разницу только эксперт почует

Автор:  Shishok [ 22 мар 2018, 12:51 ]
Заголовок сообщения:  Re: Font Cell

Попробуй:

Код:
Sub FontChange()
Dim f As String, fIndex As Integer

f = "GOST type A"
fIndex = ActiveDocument.Fonts(f).Index

ActiveWindow.Selection(1).Cells("Char.Font[1]").FormulaU = fIndex

End Sub

Автор:  is308 [ 22 мар 2018, 12:59 ]
Заголовок сообщения:  Re: Font Cell

Логично! Узнать индекс нужного шрифта и подставить его в FontCell.
Помогло!
Спасибо!

Автор:  Tumanov [ 22 мар 2018, 13:05 ]
Заголовок сообщения:  Re: Font Cell

Я бы еще попробовал создать стиль с нужным шрифтом.
Тогда переключение шрифта может вообще не понадобиться.
А если понадобится, то стиль можно назначить непосредственно по имени.
-------
А самое главное, о чем я обычно упоминаю в таких топиках (но народ это игнорирует), так это то, что не нужно бы связываться с такими шрифтами.
ЕСКД допускает при машинном выпуске документации использовать шрифты, отличные от чертежного. Нужно ткнуть свой отдел нормализации и стандартизации в это положение. Или, если уж нужно однообразие, закрепить под это дело один из обычных шрифтов в стандарте предприятия. Сразу снимется куча проблем.

Страница 1 из 1 Часовой пояс: UTC + 3 часа [ Летнее время ]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/