私にできる範囲でつくってみました。最初にシート名を取得して、それらを見ながら、どのシートにはどんなヘッダーを付けるかを検討できるようにしてみました。作業の流れは次のようです。シート「ワークシート名取得」を一番右端に作っておく。(シート名は変えない。)マクロの「ワークシート名取得」を実行。シート「ワークシート名取得」のA列にワークシート名が入るので、各シートのヘッダーに入れたい文字列などをB列に入力。マクロから「ヘッダーへの文字列の挿入」を選んで実行。B列に入れた内容が各ワークシートのヘッダーとして入る。※入れたヘッダーを消したければ、B列に入れた値を削除してセルを空欄にしたら手順4をもう一度実行。保存してから、シート「ワークシート名取得」を一番右端につくっておいてください。(シート名は変えないで。)シートをつくったら、ワークシート名を取得するコードを実行してください。ワークシートごとに任意のヘッダーを指定するということでしたので、ワークシート名を取得することから始めてみました。やって、ブックのなかにいまあるワークシート名をすべて取得したら、ワークシートごとにヘッダーに入れたい値を手入力してください。それから、いま手入力した値をヘッダーへ挿入するコードを実行するという流れにしてみました。ヘッダーは「左側」に入れるようにしました。起動したら、標準モジュールを挿入して、以下のコードをコピー貼り付けしてください。("ワークシート名の取得ができました。")'''このプロシージャーを使う前には、シート「ワークシート名取得」を一番右端に作っておく。