月によって一週目の数式を変化させるカレンダー

質問

ＡＢＣＤＥＦＧ
１　　　２
２日月火水木金土
３１２３４５６７
４

【最終質問内容】
Ｄ３において、
もし、Ｄ１が４か７の時、１を入れる。それ以外の時、
さらにもし、左のセル（Ｃ３）が空白の時、空白にする。それ以外の時、Ｃ３＋１の結果を入れる。

【内容】
・2009年のカレンダーを作っています。
・バージョンは、Excel2000です。
・Ｄ１は月の数字で、１～１２を手打ちで入れると、月から１日目の曜日を設定して２日目からは＋１をしていく。
という仕様を目指しています。

【質問】
・「月を入れたら１日が来るセルの数式」について、行き詰ったのでご質問させていただきます。
例えば上図は２月の例ですが、２月は日曜で始まるので、
Ａ３には、if(D1=2,1,"")となります。
ですが、日曜で始まる月は3月と11月もあるので、
if(or(D1=2,D1=3,D1=11),1,"")になります。
同様に、一週目（３の列）を設定すると、
Ｂ３　if(D1=6,1,"")
Ｃ３　if(OR(D1=9,D1=12),1,"")
Ｄ３　if(OR(D1=4,D1=7),1,"")
Ｅ３　if(OR(D1=1,D1=10),1,"")
Ｆ３　if(D1=5,1,"")
Ｇ３　if(D1=8,1,"")
となります。
これをさらに、
B3からG3の""の部分に、「２日目からは＋１」という設定を入れなければなりません。

Ｄ３セルを例として、条件をまとめますと、
「もし、Ｄ１が４か７の時、Ｄ３に１を入れる。それ以外の時、
さらにもし、左のセル（Ｃ３）が空白の時、空白にする。それ以外の時、Ｃ３＋１の結果を入れる。」
としたいのです。
何か良い方法はないでしょうか？
よろしくお願いします。

回答No.1

piro19820122 · ベストアンサー

WEEKDAY関数を使われると、より簡単にできるかと思います。

それとアドバイスですが、Ａ列～Ｇ列を使わず、Ｂ列～Ｈ列を使った方が式を立てるのが楽です。というのも、Ａ列はさらに左を参照できませんが、Ｂ列ならさらに左を参照できるので、同じ式が活用できるからです。

というわけで、以下Ａ列を挿入したものとして回答します。
WEEKDAY(2009,E1,1) で各月１日の曜日を表す数字が返ってくるので、
B3 =IF(COLUMN()-1=WEEKDAY(DATE(2009,$E$1,1)),1,IF(COLUMN()-1>WEEKDAY(DATE(2009,$E$1,1)),A3,""))
として、これをH3までコピーしてはいかがでしょう？

回答No.2

piro19820122

#1です。
式を少し間違えました。
IF文の一番後ろにある A3 を A3+1 にしてお使いください。
でないと、全部 1日になってしまう…（笑）

お礼

遅くなりました。
ずいぶん前に解決していたのですが、パスワード忘れてしまって四苦八苦してました。
返事が遅れてすいませんでした。
現在は、エクセルでのカレンダーをいろいろな方法で試みています。
伝授してくださった事柄も試しました。
すごく使い勝手が良いです。