Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

32837 / 76734

←次へ　｜　前へ→


	【49129】Re:月の日にち一覧の自動表示

通りすがり - 07/5/24(木) 13:30 -


	引用なし

	パスワード

▼syugyoutyu さん：
こんにちは。
横からすいません。
ウッシさんの関数はシリアル値を返しているわけではないので

>＜=CHOOSE(WEEKDAY(C3,1),"日","月","火","水","木","金","土")

は正確な曜日が得られませんよ。(^^;

賢くないかもしれませんが，私なら，
A1→2007(年)として，
C3=DATE($A$1,B2,1)
D4=IF(C3="","",IF((C3+1)=DATE($A$1,$B$2+1,1),"",C3+1))　セルAG3までフィルコピー
とすると，シリアル値となるので，syugyoutyuさんの関数が使えます。

これなら月の他，年変更にも対応できます。
ちなみに，セルの表示形式を日付にすることを忘れずに！（dとすればOK）

3 hits

▼

【49122】月の日にち一覧の自動表示 のぶ太 07/5/24(木) 11:01