奇数ページと偶数ページのページ番号の書式を変える
 ページ番号を表示する方法は、テクニック集の
「 ページ番号をフォームまたはレポートに追加する(テキストボックスを利用して)」
を参照して下さい。

 追加したページ番号表示用のテキストボックスのプロパティシートを表示して、
[データ]タブの[コントロールソース]に次の式を入力します。

   =IIf([Page] Mod 2=0,"*" & [Page] & "*","-" & [Page] & "-")

 条件「[Page] Mod 2=0」が真(偶数ページ)の場合は、「*ページ数*」と表示され、
偽(奇数ページ)の場合は、「-ページ数-」と表示されます。

【表示例】

1ページ目      -1-
2ページ目      *2*

 MOD関数は、数値を除算した剰余を返します。

Access2000



戻る


Excel Word Access VBA! モーグ