Свойство CalloutFormat.Accent (Издатель)

Статья
04/07/2023

Возвращает или задает констанду MsoTriState , указывающую, отделяет ли вертикальная полоса выноски текст выноски от строки выноски. Для чтения и записи.

Синтаксис

expression. Акцент

Выражение Переменная, представляющая объект CalloutFormat .

Возвращаемое значение

MsoTriState

Замечания

Значение свойства Accent может быть одной из этих констант MsoTriState .

Константа	Описание
msoCTrue	Не используется с этим свойством.
msoFalse	Вертикальная полоса диакритических элементов не отделяет текст выноски от строки выноски.
msoTriStateMixed	Только возвращаемое значение; указывает сочетание msoTrue и msoFalse в указанном диапазоне фигур.
msoTriStateToggle	Задать только значение; переключается между msoTrue и msoFalse.
msoTrue	Вертикальная полоса диакритических знаков отделяет текст выноски от строки выноски.

Пример

В этом примере к активной публикации добавляется овал и выноска, указывающая на овал. Текст выноски не будет иметь границы, но он будет иметь вертикальную акцентную полосу, которая отделяет текст от строки выноски.

With ActiveDocument.Pages(1).Shapes 
 ' Add an oval. 
 .AddShape Type:=msoShapeOval, _ 
 Left:=180, Top:=200, Width:=280, Height:=130 
 
 ' Add a callout. 
 With .AddCallout(Type:=msoCalloutTwo, _ 
 Left:=420, Top:=170, Width:=170, Height:=40) 
 
 ' Add text to the callout. 
 .TextFrame.TextRange.Text = "This is an oval" 
 
 ' Add an accent bar to the callout. 
 With .Callout 
 .Accent = msoTrue 
 .Border = msoFalse 
 End With 
 End With 
End With

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через