Style.LinkStyle プロパティ (Word)
バリアント を表す段落と文字スタイル間のリンクを取得または設定します。 値の取得と設定が可能です。
構文
式。 LinkStyle
式 'Style' オブジェクトを返す式。
注釈
文字スタイルと段落スタイルがリンクされている場合、2 つのスタイルで同じ文字書式が使用されます。
例
次の使用例は、新しい文字スタイルを作成して設定し、その文字スタイルを組み込みの見出しスタイル "見出し 1" にリンクします。これにより、"見出し 1" では新しく追加されたスタイルの書式が使用されます。
Sub LinkHeadStyle()
Dim styChar1 As Style
Set styChar1 = ActiveDocument.Styles.Add _
(Name:="Heading 1 Characters", Type:=wdStyleTypeCharacter)
With styChar1
.Font.Name = "Verdana"
.Font.Bold = True
.Font.Shadow = True
With .Font.Borders(1)
.LineStyle = wdLineStyleDot
.LineWidth = wdLineWidth300pt
.Color = wdColorDarkRed
End With
End With
ActiveDocument.Styles("Heading 1").LinkStyle = _
ActiveDocument.Styles("Heading 1 Characters")
With ActiveDocument.Content
.InsertParagraphAfter
.InsertAfter "New Linked Style"
.Select
End With
Selection.Collapse Direction:=wdCollapseEnd
Selection.Style = ActiveDocument.Styles("Heading 1")
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。