![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
Excel2003を使用しております。
過去Q&Aから、部分的には理解できたところもあるのですが、
的確にヒットしなかったので、お教え願います。
ヘッダーを、複数のシートに同じものをコピーする方法で、
なにか簡単な方法はないでしょうか?
自分が作っているものは、最初から5シートあります。
仮にA~Eとさせていただきます。
シートAのA1に、特定情報を入力するとします。
それをシートB~Eのヘッダーに同じものを入力するには、
どうすればいいのでしょうか?
最初は、ひとつのシートにヘッダーを入力すれば、
関数か何かでコピーしてくれるかとは思ったのですが、
それは無理なんでしょうね。
お手数おかけしますが、宜しくお願いします。
No.2ベストアンサー
- 回答日時:
こんにちは。
特定のセルの値をヘッダーに設定するにはVBAしかなくて、次のようなコードで標準モジュールに入力してください。
----------------------------
Sub Sheet1_A1()
'シート見出しが一番左のワークシートのセルA1の内容を、アクティブブックの右ヘッダに設定する
Dim objWS As Worksheet
For Each objWS In ActiveWorkbook.Worksheets
With ActiveWorkbook
objWS.PageSetup.RightHeader = .Worksheets(1).Range("A1").Value
End With
Next objWS
End Sub
----------------------------
↑一番左のワークシートのセルA1にデータを入力した後に、このコードを実行するとアクティブブックに設定されます。
なお、このコードはセルA1とヘッダーをリンクしないので、セルA1の変更をヘッダーに反映させたい場合には再度コードを実行することが必要です。
もし、セルA1の変更をヘッダーに自動的に反映したい場合は、次のようなコードをワークシートのイベントに入力します。
-------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Call Sheet1_A1
End If
End Sub
-------------------------------
ご参考になれば幸いです。
参考URL:http://terrapy.sakura.ne.jp/
No.1
- 回答日時:
CTRLキーを押しながら見出しのシートAからEを選択してください。
※全部のシートなら見出しを右クリックして「すべてのシートを選択」でも可
「ファイル」「ページ設定」でヘッダー等の共通の設定をしてから
見出しを右クリックして「作業グループの解除」で終了です。
これ以外だとVBAになりますね。
この回答への補足
ありがとうございます。
こんな簡単な方法があったんですね。
あと、もうひとつお願いしたいのですが、
シートAのA1に、例えば日付を入力したとして、
それだけでシートB~Eのヘッダーに
自動的にコピーするとしたら、
やはりVBAしかないのでしょうか?
もしそれだけなら、どう記述すればよろしいですか?
すいません、ややこしいこと言いまして。
宜しくお願いします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルのフッタやヘッダーについて 3 2023/02/04 09:45
- Visual Basic(VBA) excelにて、特定の列に数字入力してあれば、入力してある行コピーして 別ファイルに張り付ける 2 2022/08/11 05:33
- Excel(エクセル) Excel シート複数 金額日計表と日付 簡単にシートコピーしたら前日の残高と日付を変更させたい 1 2022/07/15 22:10
- Excel(エクセル) Excel、同じフォルダ内のExcelファイルの特定シートのみを1つのファイルに集約したい 8 2022/09/07 15:12
- Visual Basic(VBA) 特定の文字を含むシートだけマクロ処理をしたい 1 2023/05/22 01:43
- Visual Basic(VBA) Excel VBA 最終行を取得しVlookup関数をコピーする方法をコーディングで教えてください。 3 2023/05/11 13:14
- Excel(エクセル) シート参照を含む数式を連続コピー 3 2022/12/10 11:42
- Visual Basic(VBA) エクセルについて教えてください。 3 2023/06/28 09:11
- Visual Basic(VBA) VBA 最終行まで数式をコピーする 3 2023/01/03 15:44
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/01/26 09:50
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ある表にフィルターをかけて出...
-
Excelのセルの色を変えた行(す...
-
エクセルの数式について教えて...
-
Excelでの記号と特殊文字につい...
-
Lookup関数
-
エクセルの数式バーのフォント...
-
MACにおけるエクセルの入力トラ...
-
IFとIFS関数
-
セルの数を求めたい
-
Excelを無料で使うには? パソ...
-
再質問です。マクロの修正箇所...
-
【マクロ】VLOOKUPにて参照元に...
-
データチェックを行うエクセル...
-
【ExcelVBA】名前を付けて保存→...
-
EXCELの散布図で日付が1900年に...
-
エクセルで「ページレイアウト...
-
スプレッドシートの関数につい...
-
エクセルでファイルの最終更新...
-
エクセルの問題です。絶対値の...
-
エクセルを使っていて2024/5/15...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
半角カタカナをヘボン式ローマ...
-
(マクロ)vlookupの元データを同...
-
エクセルで上位バイトのセルと...
-
exselの質問です
-
Excel 大小比較演算子による「...
-
Excel VBについての質問です。
-
エクセルの問題です。絶対値の...
-
非表示列の再表示に失敗
-
職場の人から聞かれており、こ...
-
Excel関数-文字列で自動作成さ...
-
Excelデータをコピペして、ペー...
-
ユーザー定義関数をアドイン登...
-
【マクロ】for next構文について
-
エクセルの日付を編集する
-
【マクロ】VLOOKUPにて参照元に...
-
exselで最小数で並び替える関数
-
libre 表計算ソフトの計算がう...
-
エクセルで表
-
エクセルの表で1年間の曜日を...
-
西暦和暦
おすすめ情報