エクセル2003で年月を入力すると自動的に縦書きの日付と曜日が表示されるような関数を

質問

A　　　　B　　　　C
1　　2008(年)

2 　5(月)

3　　　1　　　　金

4　　　2　　　　土

5　　　3　　　　日

「A1に西暦とA2に月を入力すると以下のように日付曜日が入るように」
「2月や31日までないような月にも対応できるようにお願いします

回答No.3

zap35 · ベストアンサー

色々な方法が考えられますが、一例です
まずA3セルに以下の式を貼り付けます
　=IF(MONTH(DATE($A$1,$A$2,ROW(A1)))=$A$2,DATE($A$1,$A$2,ROW(A1)),"")

B3セルの式は
　=A3
です。するとどちらのセルも「2008/5/1」が表示されますから、A3のセルは書式を「ユーザー定義」→「d」にして日付の「1」を表示させます。B3セルの書式は「ユーザー定義」→「aaa」にして曜日を表示させます。

あとはA3:B3を下方向に31行分コピーしてください

お礼

ありがとうございます。
こちらも上手く出来ました！

回答No.5

tom04

こんにちは！
色々方法は回答されていますが、
他の方法でもう一つ・・・

B3セルに
=IF(OR($A$1="",$A$2="",A3=""),"",CHOOSE(WEEKDAY(DATE($A$1,$A$2,A3)),"日","月","火","水","木","金","土"))
これでオートフィルのところでコピー！（又はダブルクリック）

（※　大の月・小の月の対処はしていませんので、とりあえず31日までのデータを作成しておいて、余分な月末の日付の行を削除してください。）

尚、この場合A1・A2セルの年・月は数値だけの入力です
（2009年とか5月）となっているとエラーになります。

以上、参考になれば幸いです。m(__)m

お礼

ありがとうございます！
大小の月は対処してないとのことでしたが、今後の参考にさせていただきます。

回答No.4

imogasi

この質問など、解説書でも読めば載っていることですよ。
聞く前に勉強して。
ーー
Googleででも「エクセル　連続日付」で照会したら、たくさん記事が出るよ。
http://oshiete1.goo.ne.jp/qa2910803.html
をはじめ多数。
色んな方法が有る。
ーーー
一例
A1　2009
A2 5
Å3に=DATE($A$1,$A$2,ROW()-2)
下方向に月末まで式を複写。
A列をコピーして書式をユーザー定義　aaa
これが一番易しいだろう。WEEKDAYを使うとか
=TEXT(A3,"aaa")とかの方法もある。
月末日で表示を止める方法は、今後の勉強したら。

お礼

ありがとうございます！
どうしても日にちの少ない月は表示されないようにしたかったので、参考とさせていただきます。
すみません,,勉強もしときます

回答No.2

asapinya

一つわすれました。

B3～B33はセルの書式設定でユーザー定義を選び、「aaa」としてください

回答No.1

asapinya

A3：=DAY(DATE(A1,A2,1))
A4：=IF(A3="","",IF(MONTH(DATE($A$1,$A$2,A3+1))=$A$2,A3+1,""))
A4をA33までコピー

B3：=IF(A3="","",DATE($A$1,$A$2,A3))
B3をB33までコピー

これでどうでしょう？

お礼

出来ました！
ありがとうございます。
分かりやすくてとても簡単でした！