Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Возвращает объект SmartArtQuickStyles , представляющий набор стилей SmartArt, загруженных в данный момент в приложение. Только для чтения.
Синтаксис
выражение. SmartArtQuickStyles
выражение Выражение, возвращающее объект Application.
Примечания
Набор стилей, представленный свойством SmartArtQuickStyles, соответствует стилям, доступным в группе "Стили" на вкладке "Дизайн" контекстной вкладки "Средства SmartArt" в Word.
Пример
Приведенный ниже пример кода добавляет рисунок SmartArt в активный документ, а затем задает для графического стиля SmartArt значение "Polished".
Dim myShape As Shape
Dim mySmartArt As SmartArt
Set myShape = ActiveDocument.Shapes.AddSmartArt(Application.SmartArtLayouts(1), 50, 50, 200, 200)
Set mySmartArt = myShape.SmartArt
mySmartArt.QuickStyle = Application.SmartArtQuickStyles.Item(6)
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.