[[20240402204010]] 『カレンダー』(takako ) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) |

| 全文検索 | 過去ログ ]

 

『カレンダー』(takako )

エクセル初心者です。
調べても条件に合うものを見つけられなかったので教えてください。

 -A--B--C--D 
1
2
3

A1に西暦 B1に月、A2からA32に日付と曜日
西暦、月を入力したら日付と曜日が自動で変わる
カレンダーを作成したいのですが、
日付と曜日を同じセルで、日付(曜日)で表示したいです。
例:02(火)

ご教授いただけると幸いです。
よろしくお願いいたします

< 使用 Excel:Excel2019、使用 OS:Windows10 >


表示したい日付は当月のみか不明なので、
ひとまず叩き台として。

A2 =DATE(A$1,B$1,1)
A3 =A2+1
以下、下方向へフィル。

A2:A32のセルの書式設定>ユーザー定義>dd(aaa)

(ニック) 2024/04/02(火) 21:07:07


ニックさんありがとうございました!
助かりました
(takako ) 2024/04/02(火) 22:13:47

またご教授いただきたいです。

次は横のカレンダーで、
A1に西暦、B1に月、CDE2 FGH2 ・・・COCPCQ2と、3つセルを結合したセルに
日付(曜日)
西暦と月を入力したら日付と曜日が自動で変わり、
CDE3結合.CDE4結合、C5.D6,D7、CDE8結合、CDE9結合、C10,C11、C12、
この法則で最終行C38行まで表を作成した際、
土曜日の行が塗りつぶしで青、日曜・祝日が赤で塗りつぶしになる
方法を教えていただきたいです。
結合したセルがないカレンダーはできたのですが、
結合したセルでは試行錯誤の末解決できなかったので
どうぞよろしくお願いいたします。

(takako ) 2024/04/04(木) 00:20:45


>試行錯誤の末解決できなかった
どのようなことを"試行錯誤"して、なぜダメと判断したんですか?
セルに入っているのは「シリアル値」になっていますから、休日は別にして土日は【条件付き書式】が使えそうに思えるのですが。
 (セル結合がネックになっているのでしょうか?)

(もこな2 ) 2024/04/04(木) 09:05:47


 >結合したセルがないカレンダーはできた
 小の月(31日ない月)も意図した通りになったんですか?

 とりあえず 2行目だけ

 C2(C2:E2の結合セル)
 =IFERROR(($A$1&-$B$1&-ROUNDUP(COLUMN(A2)/3,0))*1,"")

 表示形式〜ユーザー定義 dd(aaa)
 CO2:CQ2の結合セルまで右コピー

 2024年2月なら29日まで、その他の小の月は30日までしか表示されません。

 ■または・・・
 C2(C2:E2の結合セル)
 =DATE(A1,B1,1)

 F2(F2:H2の結合セル)
 =IF(C2="","",IF(MONTH(C2+1)=$B$1,C2+1,""))

 ↑をCO2:CQ2の結合セルまで右コピー(表示形式は上と同じ)

 ■ちょっと確認
 >土曜日の行が塗りつぶしで青
 土曜日の「列」でしょ?

 >CDE3結合.CDE4結合、C5.D6,D7、CDE8結合
                      ~~~~~~~~~
 波線部はどういうこと?

 以上
(笑) 2024/04/04(木) 11:00:31

((笑))さんありがとうございました。

 C2(C2:E2の結合セル)
 =DATE(A1,B1,1)
 F2(F2:H2の結合セル)
 =IF(C2="","",IF(MONTH(C2+1)=$B$1,C2+1,""))
 ↑をCO2:CQ2の結合セルまで右コピー(表示形式は上と同じ)

の方で自動に変わるようになりました。

 >土曜日の行が塗りつぶしで青
 土曜日の「列」でしょ?

すいません。行です。
説明が悪く申し訳ありません。

>CDE3結合.CDE4結合、C5.D6,D7、CDE8結合

                      ~~~~~~~~~
 波線部はどういうこと?

申し訳ありません。私の入力間違いです。
3、4行目はCDE列結合、5.6行目はCDE結合していないセル
7.8行目はCDE列結合

   -A--B-CDE-FGH-.............-COCPCQ-
1 
2
3        
4
5
6
:
:
35
36
37
38

2行目CDEから横に日付、曜日が入り、
3行目から38行目までを土曜日に青、日曜祝日に赤で塗りつぶしに
なるように、条件付き書式にしたいのですが、
3.4行目は結合されたセル(CDE)5.6行目は結合していないセル、
7.8行目は結合されたセル、9.10行目は結合していないセル、
これを交互に繰り返し、35.36行目は結合されたセル、37.38行目は
結合されていないセルで最終行のカレンダーです。

カレンダーを範囲選択して、=WEEKDAY($C3)=1と条件付き書式で
できなかったので、結合されているセルを含んでいるからできないのか
教えていただけたら幸いです。
よろしくお願いいたします。

(takako) 2024/04/04(木) 15:41:34


 >すいません。行です。
 なんで「行」なのかわかりませんけど
 とりあえず・・・

 祝日の判定が必要なら、どこかに祝日の日付を入力しておく必要があります。

 ・Sheet2のA2:A50 に祝日の日付だとして

 C3:CQ38を選択して条件付き書式〜ルールの管理

 ↓ の順番に設定すること!

 新規ルール(土曜)
 種類:数式を使用して、書式設定するセルを決定
 数式:=AND(COLUMN(A2)/3<=DAY(MAX($C$2:$CQ$2)),WEEKDAY(MAX($C$2:C$2))=7)
 青を設定

 新規ルール(日曜・祝日)
 数式:=AND(COLUMN(A2)/3<=DAY(MAX($C$2:C$2)),WORKDAY.INTL(MAX($C$2:C$2)-1,1,11,Sheet2!$A$2:$A$50)>MAX($C$2:C$2))
 赤を設定

 参考まで
(笑) 2024/04/04(木) 17:16:14

(笑)さん、ありがとうございます。
お礼が遅くなり申し訳ありませんでした。

当初お聞きした際より、A列に項目を追加したので、
B1セルに”年”Cセルに”月”、DEF・・・CPCQCRと
なりました。

   -A--B-C-DEF-GHI-.............-COCPCQ-
1 
2
3        
4
5
6
:
:
51
52
53
54

・Sheet2のA2:A50 に祝日の日付だとして

>別Sheetに(sheet名:祝日)を作成(A1:A21)

 C3:CQ38を選択して条件付き書式〜ルールの管理

>D2:CR54を選択して条件付き書式〜ルールの管理

 ↓ の順番に設定すること!
 新規ルール(土曜)
 種類:数式を使用して、書式設定するセルを決定
 数式:=AND(COLUMN(A2)/3<=DAY(MAX($C$2:$CQ$2)),WEEKDAY(MAX($C$2:C$2))=7)
 青を設定

>=AND(COLUMN(B2)/3<=DAY(MAX($D$2:$CR$2)),WEEKDAY(MAX($D$2:D$2))=7)
 塗りつぶしを青を設定

塗りつぶしできました!

 新規ルール(日曜・祝日)
 数式:=AND(COLUMN(A2)/3<=DAY(MAX($C$2:C$2)),WORKDAY.INTL(MAX($C$2:C$2)-1,1,11,Sheet2!$A$2:$A$50)>MAX($C$2:C$2))
 赤を設定

>=AND(COLUMN(B2)/3<=DAY(MAX($D$2:D$2)),WORKDAY.INTL(MAX($D$2:D$2)-1,1,11,祝日!$A$1:$A$21)>MAX($D$2:D$2))
 
 この上記の数式で、日曜祝日は反映されないのですが、
なにが原因でしょうか?

どうぞよろしくお願いいたします。

(takako) 2024/04/06(土) 11:13:49


 土曜も日曜・祝日も、どちらの式も
 冒頭の ↓ の波線部分を修正

 >=AND(COLUMN(B2)/3<=(後略)
       ~~~~
 この場合の COLUMN の引数は必ず「A列のセル番地」にすること!
 A列に何が入力されてるとか、されてないとか関係ありません。

 つまり
 =AND(COLUMN(A2)/3<=(後略)
            ~~~~
 もう一度言いますけど
 土曜も日曜・祝日も、どちらの式も、です。

 以上
(笑) 2024/04/06(土) 16:24:11

(笑)さん
ありがとうございます!
できました!
何度も繰り返し本当にありがとうございます。
早く理解ができるよう頑張ります。
(takako) 2024/04/06(土) 22:10:10

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.