• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Excel2010のVBAでライトヘッダーが出ない)

Excel2010のVBAでライトヘッダーが出ない

このQ&Aのポイント
  • Excel2010のVBAでライトヘッダーの日付が印刷されない現象が発生しています。問題を解決するために修正する必要があります。
  • Excel2010のVBAでライトヘッダーの日付が印刷されない理由と、それを修正するための手順について教えてください。
  • Excel2010のVBAでライトヘッダーの日付が表示されない問題が発生しています。日付が出力されるように修正する方法を教えてください。

質問者が選んだベストアンサー

  • ベストアンサー
  • Nobu-W
  • ベストアンサー率39% (725/1832)
回答No.1

.RightHeader = Format(Date, "yyyy/mm/dd") 挿入して下さい m(_ _)m

afromen
質問者

お礼

ありがとうございました。 フォントの指定をやめて、 "&D" を教えていただいたコードに差し替えたら うまくいきました。 "&D"ではうまくいかないんですね。

その他の回答 (2)

  • imogasi
  • ベストアンサー率27% (4737/17069)
回答No.3

マクロの記録も良いが、この場合(PageSetup)は 余分な項目がたくさん網羅的に出るので Sub test01() MsgBox ActiveSheet.PageSetup.LeftHeader ActiveSheet.PageSetup.LeftHeader = Format(Date, "ggge.mm.dd") MsgBox ActiveSheet.PageSetup.LeftHeader '--- dt = "2020/02/13" ActiveSheet.PageSetup.LeftHeader = Format(dt, "ggge年mm月dd日") MsgBox ActiveSheet.PageSetup.LeftHeader '--- End Sub ’--- などで勉強してはどうですか。 参考 http://www.eurus.dti.ne.jp/~yoneyama/Excel/vba/vba_header.html

afromen
質問者

お礼

回答ありがとうございます。 フォントの指定をやめて "&D" を Format(Date, "ggge.mm.dd") へ 差し替えたところ表示されるようになりました。 日付の表示 はFormat(Date, "ggge.mm.dd") で 行わなければならないんですね。

  • kkkkkm
  • ベストアンサー率66% (1719/2589)
回答No.2

VBAをブロックごとに実行(ブレークポイント設定)してプレビューで都度確認して日付が表示されなくなる部分を探してみてください。 ブロックがわかればそのブロック内でステップ実行して同じようにどの行を実行したら表示されなくなるか探してみてください。

afromen
質問者

お礼

回答ありがとうございます。 ステップインと印刷プレビューで 確認したのですが、 場所としてはループの中のレフトヘッダーを 指定したときでした。 残念ながら私ではなぜレフトヘッダーを 設定するとライトヘッダーが消えてしまうのか わかりませんでした。

関連するQ&A