Font.Duplicate メソッド (Publisher)

  • [アーティクル]

指定した Font オブジェクトの複製を作成し、その新しい Font オブジェクトを返します。

構文

式。重複

式Font オブジェクトを表す変数。

戻り値

Font

例

次の使用例は、作業中の文書の 1 番目のページの 1 番目の図形にあるテキスト範囲から、文字書式情報を複製し、それを 2 番目の図形のテキスト範囲に適用します。

Dim fntTemp As Font 
 
With ActiveDocument.Pages(1) 
 Set fntTemp = _ 
 .Shapes(1).TextFrame.TextRange.Font.Duplicate 
 .Shapes(2).TextFrame.TextRange.Font = fntTemp 
End With

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

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