次の方法で共有


Page.Duplicate メソッド (Publisher)

指定された Page オブジェクトの複製を作成し、新規の Page オブジェクトを返します。

構文

重複

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

戻り値

Page

次の使用例は文書の最初のページを複製し、プロパティを設定しています。 次に、新しいページに図形を追加し、その図形のプロパティを設定します。

Dim objPage As Page 
Set objPage = ActiveDocument.Pages(1).Duplicate 
With objPage 
 .Background.Fill.ForeColor.SchemeColor = pbSchemeColorAccent1 
 .Shapes.AddShape msoShapeRectangle, 150, 250, 310, 275 
 With .Shapes(1) 
 .Fill.ForeColor.SchemeColor = pbSchemeColorAccent3 
 End With 
End With 

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

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