次の方法で共有


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

関連項目

Style オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。