Excelでフッターを一括設定!ページレイアウトも崩れないやり方

公開日: : VBA

同じブック内ですべてのシートが同じページレイアウトだったら、

すべてのシートをSHIFTを押下しながら選択し、

挿入 > ヘッダーとフッター

などでフッター編集すれば一括でフッターが設定できるけど、

同じブック内でページレイアウトが違ってたりすると、上記のやり方でやるとフッター以外にページレイアウトも変わってしまう。

フッターだけを一括で変えたければ、VBAを使う

  1. Excelを開いた状態でAlt + F11を押下する
  2. 一番左のシートをダブルクリックする
  3. VBAのコード入れる画面
  4. 以下のコードをコピペする
Sub footerChange()
Dim mySheet As Worksheet

For Each mySheet In Worksheets

FooterChange (mySheet.Name)
Next
End Sub

Public Sub FooterChange(sheet_name)

' 右下フッターに文字列を挿入
Worksheets(sheet_name).PageSetup.RightFooter = "フッターに表示したい文字列"
End Sub

上記の”フッターに表示したい文字列”の部分をお好きに変更してくださいませ。
また、右下じゃなくて真ん中を変えたい場合はPageSetup.RightFooterをPageSetup.CenterFooterに変えれば良い。

 

  1. F5キーを押下する
  2. 実行を選択する
  3. 実行し終わったらコピペしたコードをすべて削除する(拡張子がxlsxのままだとExcelファイルが保存できないため)
  4. VBAの画面を画面右上のXボタンで閉じる

以上

Googleアドセンスレスポンシブ

関連記事

no image

Excel VBA で同フォルダにあるBookの同名シートを一つのシートにまとめる

同じブックにまとめるやりかたと同じシートにまとめるやりかたを書いてます。 元々のソース

記事を読む

Googleアドセンスレスポンシブ

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください

Googleアドセンスレスポンシブ

php-logo
php =& イコールアンパサンド で参照渡し

意味 変数やオブジェクトなどを参照渡しする。 # 下記はど

php-logo
php5 varによる宣言

古い、人が作ったソース見てたらvarで変数宣言しているのがあって調

php-logo
php parent 親クラスのプロパティやメソッドにアクセスする

子クラスで使う すると親クラスのプロパティやメソッドにア

php-logo
phpの変数などにつく「_」アンダースコアについて調べた

ちょこちょこいろんなところで見てモヤモヤしておりました。phpだけ

数字と記号
Webブラウザだけでfavicon.ico作成

  1.基となる記号作成 こちら  

→もっと見る

PAGE TOP ↑