次の方法で共有


PageNumbers.Add メソッド (Word)

セクション内のヘッダーまたはフッターに追加するページ番号を表す PageNumber オブジェクトを返します。

構文

Add (PageNumberAlignment, FirstPage)

expression 必須です。 PageNumbers オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
PageNumberAlignment オプション バリアント型 WdPageNumberAlignment クラスの定数を使用できます。
FirstPage オプション バリアント型 False に設定すると、先頭ページのヘッダーとフッターが、それ以降のページのヘッダーとフッターとは別の指定になります。 引数 FirstPage を False に設定すると、先頭ページにページ番号が付けられません。 この引数を省略すると、設定は DifferentFirstPageHeaderFooter プロパティの値に従います。

注釈

HeaderFooter オブジェクトの LinkToPrevious プロパティを True に設定すると、文書全体をとおして、特定のセクションから次のセクションへ、連続するページ番号が付けられます。

次の使用例は、作業中の文書で、最初のセクションのプライマリ フッターにページ番号を追加します。

With ActiveDocument.Sections(1) 
 .Footers(wdHeaderFooterPrimary).PageNumbers.Add _ 
 PageNumberAlignment:=wdAlignPageNumberLeft, _ 
 FirstPage:=True 
End With

次の使用例は、作業中の文書のヘッダーにページ番号を作成し、その書式を設定します。

Set myPgNum = ActiveDocument.Sections(1) _ 
 .Headers(wdHeaderFooterPrimary) _ 
 .PageNumbers.Add(PageNumberAlignment:= _ 
 wdAlignPageNumberCenter, FirstPage:= True) 
myPgNum.Select 
With Selection.Range 
 .Italic = True 
 .Bold = True 
End With

関連項目

PageNumbers コレクション オブジェクト

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

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