エクセル2003 日付がうまく表示されない

質問

お世話になります。

現在「B1」と「B2」の日付を変えると、
その月の21日から翌月20日までの「日付・曜日」が「E～AI4・E～AI6」に表示されるようにしてあるのですが、
1月を選択するとうまく表示されません。
（2009年13月にするとうまくいきます）

「E4」には、
=IF(E6="","",CHOOSE(WEEKDAY(E6,1),"日","月","火","水","木","金","土"))

「E6」には、
=IF(MONTH(E5)>$B$2-1,"",E5)

5の行は通常見えなくしてあり、
2月など31日まで無い月は「E～AI6」にそれらの日を表示しないようにしてあります。

うまく表示されるには、どうすればよいでしょうか？
エクセル2003です。

宜しくお願いいたします。

回答No.1

cistronezk · ベストアンサー

なんとも全体像が見えにくい説明なので推測ですが、
＞「E6」には、
＞=IF(MONTH(E5)>$B$2-1,"",E5)
これを
=IF(MONTH(E5)>MOD($B$2+10,12)+1,"",E5)
としてはどうでしょう。

お礼

早速のご回答、ありがとうございます。
また、説明不足で申し訳ありません。

希望通りになり、感謝しております。
ありがとうございました。

回答No.2

135ok

ご参考で。
式を変えてもいいのであれば、下記を試してみてはいかがでしょうか。
希望通りの月日が表示されると思います。

Ｅ４　=IF(E6="","",TEXT(E6,"aaa"))
　　　*右にコピー

Ｅ６　=DATE(B1,B2,21)
Ｆ６　=IF(E6="","",IF(E6+1>DATE($B$1,$B$2+1,20),"",E6+1))
　　　*右にコピー
　　　*セルの書式の設定で、日付の表示を決める。

お礼

早速のご回答ありがとうございます。
コピーしてやってみたらうまくいきました。
感謝いたします。ありがとうございました。