エクセルのヘッダの設定についての質問です。
ヘッダやフッタの日付ボタンで指定をした場合、日付の書式を変更することは、できるのでしょうか。
教えてください。例 m月d日

このQ&Aに関連する最新のQ&A

A 回答 (1件)

こんにちは



 マクロで実現します。

1.以下のコードの"Private Sub"から"End Sub"までをマウスのドラッグで選択

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.CenterHeader = Format(Date, "m月d日")
End Sub

2.Ctrl+C (コピー)
3.Excelでヘッダーの表示形式を変更したいブックを開く
4.Alt+F11(メニュー[ツール]-[マクロ]-[VBE])
→VBEを起動
5.フッターの表示形式を変更したいブックのThisWorkbookをダブルクリック
→コードウィンドウが表示される
6.コードウィンドウ上でCtrl+V (貼り付け)
→コードウィンドウに、上記1.のコードが貼り付けられる
7.Alt+F4→VBEが終了して、エクセルに画面が切り替わる

 CenterHeaderという部分を以下に変更することで、左/中央/右、ヘッダ/フッタの位置を指定することができます。

RightHeader
LeftHeader
RightFooter
CenterFooter
LeftFooter

 "m月d日" の部分を "ggge年m月" に変更すると 平成13年2月 のように表示します。

参考URL:http://www2.odn.ne.jp/excel/
    • good
    • 0
この回答へのお礼

お返事が遅くなってしまいました。
そうですか、マクロでしか実現できないんですか(T_T)
一度チャレンジします。

お礼日時:2001/02/22 21:06

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Q日付 =TEXT(C2,"m月d日(aaa)")が=TEXT([@月日],"m月d日(aaa)")

日付を文字列に変換するため
=TEXT(C2,"m月d日(aaa)
と入力していたものが
今見ると 
=TEXT([@月日],"m月d日(aaa)")
となっていました。
数式バーをクリックすると[@月日]は、
画像のように青くなっています。
なぜこうなるのですか

Aベストアンサー

テーブルの構造化参照になっているだけですね。

Excel2007以降 テーブル書式は基本中の基本の使い方なので必ず
勉強して使えるようになっておくべきだと思います。

Q「[$-411]ge,m,d」型 書式設定エクセル

いつも使ってるエクセルのファイルなのですが
今日開いたら数値の書式設定ががすべて
「[$-411]ge,m,d」型になってたのですが
なぜなのでしょうか?
バグでしょうか?

エクセル2010です。

Aベストアンサー

>今日開いたら数値の書式設定ががすべて「[$-411]ge,m,d」型になってたのですが

日付ではなく、「数値」の書式が「[$-411]ge,m,d」に変更されていたということでしょうか?

また、「[$-411]ge,m,d」ではなく、「[$-411]ge.m.d」の誤りではないでしょうか?

基本的にセルの表示形式が、何もしないのに勝手に変更されることはありませんが、例えば日付のセルを参照した数式を入力すると(例A1セルに提示された日付書式が入力されていて、このセルを参照する「=A1+7」のような数式を入力すると、そのセルは自動的に同じ日付書式となりますので、データを削除しても数式を入力したセルには日付書式のみ残ることになります。

少なくとも提示した書式のセルがそのブックにあるなら、上記のような操作(その後そのセルをコピー貼り付けした)琴が無いか、確認してみてください。

QExcelでヘッダ、フッタ設定を共有

Excelで1ファイルにシートが複数枚ある時、1つのシートに設定したヘッダ、フッタ情報を
すべてのシートに反映させることはできるのでしょうか。

ex.A~Eの5つのシートがある時、Aのシートのヘッダにシート名(A)、フッタにファイル名を設定。
残りのB~Eは印刷時に自動的にAシートと同様のヘッダ、フッタが印字される。

Aベストアンサー

もしかして、質問の趣旨とはずれているかもしれませんが、グループ化して(シートAをクリック後、シフトキーを押したまま、シートEをクリック)、ヘッダ、フッタに入力してみてはいかがでしょうか?

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

複数のシートを選択してヘッダ、フッタを変更すると、
印刷の向きや拡大縮小率も一緒に変更されてしまいます。
印刷の向きはバラバラで、ヘッダ、フッタのみを揃えるにはどうすればよいですか?

現在、以下のような方法で処理しています。
1.複数のシートを選択
2.表示->ヘッダ/フッタを開く
3.ヘッダ/フッタを変更

なお、ネット上で公開されているフリーソフトやアドインを使用せず、
自分で設定できる方法で教えていただけると助かります。

Aベストアンサー

こんにちは。
マクロを使えばできます。

下記マクロを該当エクセルファイルか個人用マクロブックにコピペして実行してみてください。
ヘッダーとフッターに設定する文字は実際の設定値に変更してください。
※選択したシートのみ変更されます。

Sub SetHeader()
Dim mySheet As Worksheet
Application.ScreenUpdating = False
For Each mySheet In ActiveWindow.SelectedSheets
With mySheet.PageSetup
.LeftHeader = "左ヘッダー"
.CenterHeader = "中央ヘッダー"
.RightHeader = "右ヘッダー"
.LeftFooter = "左フッター"
.CenterFooter = "中央フッター"
.RightFooter = "右フッター"
End With
Next
Application.ScreenUpdating = True
End Sub

こんにちは。
マクロを使えばできます。

下記マクロを該当エクセルファイルか個人用マクロブックにコピペして実行してみてください。
ヘッダーとフッターに設定する文字は実際の設定値に変更してください。
※選択したシートのみ変更されます。

Sub SetHeader()
Dim mySheet As Worksheet
Application.ScreenUpdating = False
For Each mySheet In ActiveWindow.SelectedSheets
With mySheet.PageSetup
.LeftHeader = "左ヘッダー"
.CenterHeader = "...続きを読む

Qエクセルで条件付書式設定を解除して書式設定を残す方

説明がしづらく、うまく伝えられればいいのですが。

条件付書式でセルに色を付けたりしています。
 例) A行のセルに
    100より小さい数字が入力されていたら、B行は赤で塗りつぶす。
    100より大きい数字が入力されていたら、B行は青で塗りつぶす。
    B行には文字や数字が入力されています。

例)のような場合で、B1に赤、B2が青で塗られている場合
条件付書式を介さずに、B1やB2に色の塗りつぶしを残す方法がありますでしょうか?

条件付書式の解除(削除?)しても、A行に数字がなくても、B行に色が付いていて欲しいのです。
シートやファイルやセルは、別の場所を使用しても問題ありません。

考えている事は、
計算式で答えを表示してあるセルを、値のみコピーする。のような方法の、書式のみペーストといった形です。
他に希望通りの表示ができれば特に細かな点は気にしません。



いろいろなセルから条件をつけてリンクされたり計算結果を表示させたりした、プレビュー用といいますか、見た目の完成された表を、別担当に渡すことになりました。

式でできたシートではなく、テキストや数字の入力されたシートに変換して渡す場合、条件付書式が効いているとその後の作業に見た目の不具合が生じてしまうことを避けたいのです。

何かいい方法があれば教えてください。
説明不足がああれば、補足します。

説明がしづらく、うまく伝えられればいいのですが。

条件付書式でセルに色を付けたりしています。
 例) A行のセルに
    100より小さい数字が入力されていたら、B行は赤で塗りつぶす。
    100より大きい数字が入力されていたら、B行は青で塗りつぶす。
    B行には文字や数字が入力されています。

例)のような場合で、B1に赤、B2が青で塗られている場合
条件付書式を介さずに、B1やB2に色の塗りつぶしを残す方法がありますでしょうか?

条件付書式の解除(削除?)しても、A行に数字がなくて...続きを読む

Aベストアンサー

一番解り易いのは、必要なだけのセル範囲を
ExcelからWordにコピペ、続いてWordからExcelにコピペ。
以上で、条件付きでない書式を確定できます。
場合によっては、そうして得られた書式データだけを
書式貼り付けした方が編集し易い場合もあるかも知れません。

また、場合によっては、シートごと
.xpsや.pdf、.htnや.html、で一旦保存してしまう、
などの対応になります。

Excelアプリケーション単体での対応、となると、
VBAによる対応になりますが、
バージョンごとに細かく対応が分かれます。
詳しく研究なさっている方を存じあげていますが、
私としては得意なジャンルではありませんので、
もし、VBAが良ければ、その旨、補足して、
識者のご登場を数日待ってみて下さい。


このカテゴリの人気Q&Aランキング

おすすめ情報