• ベストアンサー

複数シートのページ設定の内、フッターのみ変更したい

Excel2002で複数シートのページ設定の内、フッターのみ変更したいのですが、何か方法はないでしょうか。 フッターのみ変更したくて、そのほかの余白などはそれぞれのシートの設定を残しておきたいのです。 作業グループにしてページ設定を変更すると、余白なども全て同じになってしまうので、これを回避したいのですが・・・。

質問者が選んだベストアンサー

  • ベストアンサー
  • dobaken
  • ベストアンサー率63% (7/11)
回答No.2

こんにちは。 マクロを使えばできます。 下記マクロを該当エクセルファイルか個人用マクロブックにコピペして実行してみてください。 フッターに設定する文字は実際の設定値に変更してください。 ※選択したシートのみ変更されます。 Sub SetHeader() Dim mySheet As Worksheet Application.ScreenUpdating = False For Each mySheet In ActiveWindow.SelectedSheets With mySheet.PageSetup .LeftFooter = "左フッター" .CenterFooter = "中央フッター" .RightFooter = "右フッター" End With Next Application.ScreenUpdating = True End Sub

m_9244
質問者

お礼

返事が遅くなり、申し訳ありません。 試してみたところ、うまくいきました。 ありがとうございました。

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (1)

noname#16474
noname#16474
回答No.1

どのように変更したいのですか？

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. オフィス系ソフト

関連するQ&A

  • エクセルのページ設定を複数シート一括で変更する方法

    お世話になります。 Microsoft Excel 2000について質問です。 ファイル→ページ設定でヘッダ・フッタ等の編集が出来るかと思いますが、 複数シートの設定をまとめて変更する際、 Ctrlキー+選択で複数のシートが選択された状態で ページ設定を行っていますが、 何故か表示されているシートの設定しか変更されません。 方法が間違っているのでしょうか？ よろしくお願いいたします。

  • EXCELの複数のシートに同じページ設定をしたいです

    いつもお世話になっております。 マクロに初挑戦です。 すでに作成してあるブックに、同じページ設定をしたいです。 「マクロの記録」で、以下のマクロを作成しました。 Excel2003です。 Sub PageSetting() ' Keyboard Shortcut: Ctrl+Shift+F With ActiveSheet.PageSetup .RightHeader = "&A" '右上にシート名 .CenterFooter = "- &P -" '下中央にページ番号 .RightMargin = Application.InchesToPoints(0.393700787401575) '右余白1cm .TopMargin = Application.InchesToPoints(0.78740157480315) '上余白2cm .BottomMargin = Application.InchesToPoints(0.393700787401575) '下余白1cm .HeaderMargin = Application.InchesToPoints(0.590551181102362) 'ヘッダー1.5cm .FooterMargin = Application.InchesToPoints(0.196850393700787) 'フッター0.5cm End With End Sub ブック内のすべてのシートに適用するわけではないので、 複数シートを選択しておいて(作業グループ)、 まとめて適用したいのですが、どうすればよいのでしょうか? 今現在は、設定したいシートを1つずつ選択して、 Ctrl+Shift+F　を押しています。 よろしくご指導お願い致します。

  • 複数シートのヘッダ・フッタのみを揃えるには？

    複数のシートを選択してヘッダ、フッタを変更すると、 印刷の向きや拡大縮小率も一緒に変更されてしまいます。 印刷の向きはバラバラで、ヘッダ、フッタのみを揃えるにはどうすればよいですか？ 現在、以下のような方法で処理しています。 １．複数のシートを選択 ２．表示->ヘッダ/フッタを開く ３．ヘッダ/フッタを変更 なお、ネット上で公開されているフリーソフトやアドインを使用せず、 自分で設定できる方法で教えていただけると助かります。

  • エクセルで複数のシートの書式設定

    こんにちは。 エクセル2000です。 複数のシートを書式設定？（ヘッダーの設定、余白の設定）する方法を 教えてください。作業グループにしてもうまくいかないような・・・

  • エクセル　複数シートの余白設定について

    EXCEL2003を利用し、複数シートのブックでマニュアルを作成しています。方眼紙のようにセルを設定し、セルの大きさも全シートそろえました。また、各シートの余白・ヘッダー・フッターを同一にし、縮尺も100%で設定しているにも関わらず、印刷プレビューしてみたところ、各シートによって１ページあたりに印刷される範囲が異なってしまいます。改ページ設定もクリアし、印刷範囲設定もクリアしましたが、改善されません。（例：ＡのシートはＡＦのセルまで１ページに印刷されるところ、Ｂのソートでは、ＡＡのセルまでしか１ページに印刷されず、２ページに分かれる）何か解決方法をご存知でしたら教えていただければ有難いです。

  • 複数シートの同時設定

    エクセル2003を使って、数枚のシートに同じ表を作成しています。（表中の数値のみ違います。） 印刷する際、シートを一枚一枚設定していくのは非効率なので、複数シート一度に設定したと思っています。ページ設定でのページタブ・余白・ヘッダー/フッターは複数シートを選択して一度に設定できましたが、印刷範囲の設定と、シートタブの印刷タイトル設定とは１シートずつしかできないのでしょうか？ こういう場合、効率的な方法があれば教えて下さい。 よろしくお願いいたします。

  • エクセルで複数シートを選択して印刷した時のフッターで指定したページ番号について

    OSはXP、Officeは2003と2007を使っています。 エクセルに複数シートがあり、2ページ以上にまたがるシートに関しては ページ設定のフッター設定にて"1/?ページ"指定してあります。 印刷時に、複数シートを選択して印刷すると、シート内のページ数 印字になりません。 <例>1シート目には1ページ分のデータ 　　2シート目には2ページ分のデータ（フッター設定"1/?ページ"） と、なっていたとして、印刷時、1,2シートを選んで印刷すると、 2枚目3枚目のフッター位置に2/3、3/3と印刷されてしまう。 ↑ これではなく、複数シートを選んだ状態でも、 2枚目3枚目のフッター位置に1/2、1/2と印刷したいのですが、無理ですか？ 30シートほどあるので、1シートづつ印刷するのが面倒なのです。 1シート毎のページ割り振りにしたいのです。 方法はないですか？

  • Excel2000でのフッタのページ番号の設定について

    Excel2000でのフッタのページ番号の設定について Excel2000でフッタに任意のページ番号を割り振るには、どうしたら良いでしょうか。 ワークシートの印刷１ページ目をページ番号２０、続く印刷２ページをページ番号２１・・・といったようにしたいです。

  • エクセルで複数シートまとめてページ設定する方法

    エクセル2000を使っています。 複数シートのページ設定をまとめてやろうと思い、シートタブを右クリックして「すべてのシートを選択」を選んでページ設定を行ったのですが、印刷の「オプション」については複数ページに設定ができません。 また、複数シートを印刷するにあたって、印刷の画面で「ブック全体」を選び、プリンタの「プロパティ」で印刷設定を変更したのですが、この場合も印刷設定の変更が1つのシートにしか反映されません。 複数シートの印刷設定をまとめて行いたいのですが、どのようにすれば良いでしょうか？

  • エクセル　改ページプレビューで複数シート変更

    2003を使用しています。 オリジナルのデータから代理店ごとにシートを分けて作成しました。 シートによりページ数は違うのですが、書式は全て同じです。 希望は、改ページプレビュー（作業グループ状態）から45行ごとに改行なのですが できませんでした。 全シートまとめて改行の変更をする方法を教えてください。 宜しくお願い致します。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する