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ランキング
-
exselの質問です
-
エクセルの日付に時差を加算 #V...
-
(マクロ)vlookupの元データを同...
-
Excelのデーターを消して保存し...
-
Excelの数式について教えてくだ...
-
pdfの表をexcelにはりつけて計...
-
エクセルの「赤」の印刷がうま...
-
エクセルで特定のセルに入力が...
-
エクセル おすすめフォント
-
一つのセルに(例えばA1)入力...
-
Excelの関数について教えてくだ...
-
関数の説明
-
Excelにいついて質問です。
-
[オプション]の[アクセスビリテ...
-
VBAについての質問です
-
Excelについて
-
CSVファイルについて質問です。
-
エクセルの「入力規則」のプル...
-
エクセルファイルがファイルの...
-
エクセルであるセルに数字を入...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBA、別ブックへ転記す...
-
エクセルでの作業計算方法について
-
時間によってファイル名が変わ...
-
【関数】適切な文字数の数字を...
-
Excelについて教えてください
-
エクセル初心者です 関数の入れ...
-
【マクロ】ファイル名の変更に...
-
UNIQUE関数が使えないバージョ...
-
エクセルの計算
-
【関数】先頭だけにある、半角...
-
Excelで、決まった行を繰り返し...
-
Excelでセルの値が同じか...
-
LOOKUP関数を使えばいいのでし...
-
Excel
-
はがきについて。
-
エクセルの条件付き書式につい...
-
エクセルのデーターが2か月前の...
-
エクセル②
-
エクセルで「-0.0」と表示さ...
-
Microsoft1Officeの互換ソフト...
おすすめ情報