エクセル フッターのページ番号をセルに反映させたい。

質問

書類を作成しています。
構成は、表紙(SHEET1)、目次(SHEET2)、説明文(SHEET3～10)としています。
説明文は1つのSHEETに数頁あります。
目次に、フッターで付加されるページNo.を自動的に反映させたいのですが可能でしょうか？
今後説明文の増減が予想され、そのたびに目次のページNo.を修正するのがもどかしく、相談させて頂きます。(無精なもので・・・)

良きアドバイス宜しくお願いします。

回答No.3

f5system

セル内にフッターのように設定するには、
まず、ページの項目を3つのセルに分解します。
次に真ん中のセルには常に/を入れます。
続いて最初の１ページ目のセルを
　１　/　＝次ページ目のセルをクリックとします。(ＥＮＴＥＲ)
続いて２ページ目のセルには
　＝前ページのセルをクリック+1　/　＝次ページのセルをクリックとします。
以降どのページのセルにも同じ設定でできます。
そして最終ページのセルで
　＝前ページのセルをクリック+1　/　＝２つ左となりのセルをクリックとします。
おわかりですか？
素人でもわかるとても簡単な方法ですね。
ページが増えても修正など不要ですよ

これを使えば目次にも簡単に反映可能ですね。

回答No.2

pauNed

こんにちは。
4.0マクロ関数を使って、説明文の各シートの頁数を取得し、
それを元に算出する案はいかがでしょう。

　　　Ａ　　　　Ｂ　　　　Ｃ
１　目次　　　頁　　　（作業列として頁数を取得）
２　SHEET3　　 1　　　2
３　SHEET4　　 3　　　5
４　SHEET5　　 8　　　2
５　SHEET6　　10　　…

例えば、目次シートが上記レイアウトで、Ｂ列にページを表示させるとして、

1)[Ctrl]+[F3]..名前定義を設定します。

[名前]　　　pages　　（←適当な名前）
[参照範囲]　=GET.DOCUMENT(50,INDIRECT("A"&ROW()))

2)C列に(1)で定義した[名前]を入力します。作業列なので非表示にしても可。

C2：=pages
以下必要行数分コピー。

3)B列に頁を表示させる数式を入力します。

B2：=SUM(C$1:C1)+1
以下必要行数分コピー。

...のような感じで。
※A列は実際のシート名でないといけません。
　変更するのであれば作業列を使って、そこを参照するように変更する必要があります。

お礼

pauNedさん詳しいご説明ありがとうございます。
まだ、実行していませんが、なんかうまくいくような気がします。
感覚で行けるような気がすれば後はそこから、どう発展させるかに掛かっていると思います。
今から挑戦してみます。
助かりました。おおきに。

回答No.1

illv_vlli

こんにちわ。
こういうことですかね？
エクセルの　ファイル⇒ページ設定⇒ヘッダー/フッター⇒フッター

このフッターのところに項目を入れればいいのではないですか？

補足

早速のアドバイスありがとうございます。

スイマセン。説明不足でした。
例えば、SHEET5の1頁目がフッターで自動付加されたページNo.の20だとしたとき、目次(SHEET2)に
SHEET5・・・・・・20
という風に、目次シートのセルにフッターで自動付加されたページ番号を反映させたいのです。

スイマセン、私の説明能力の無さにほとほと呆れています。
この説明で解って頂けましたでしょうか。