Форум пользователей 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. |
Автор: | 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/ |