Определение количества доступных шрифтов (Microsoft Word)
В ваших макросах могут быть моменты, когда вам нужно определить количество шрифтов, доступных для использования. Для этого используйте свойство Count объекта FontNames следующим образом:
x = FontNames.Count
Когда закончите, x будет содержать количество установленных и доступных для использования шрифтов.
_Примечание: _
Если вы хотите знать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах WordTips), я подготовил специальную страницу, содержащую полезную информацию.
link: / wordribbon-WordTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].
WordTips — ваш источник экономичного обучения работе с Microsoft Word.
(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (753) применим к Microsoft Word 97, 2000, 2002 и 2003. Вы можете найти версию этого совета для ленточного интерфейса Word (Word 2007 и позже) здесь:
link: / wordribbon-Determining_the_Number_of_Fonts_Available [Определение количества доступных шрифтов].