『万年カレンダー作成』（こはだ） 万年カレンダーを作成しています。 DATE関数を使って年、月を変更するだけで日付を一括変更、TEXT関数を使って曜日を一括変更出来るようにまずは作成しました。 次に上記を保ったまま土日のみ抜いた日にち、曜日を一括で表示出来る万年カレンダーの作成をしたいと考えています。 上手いことWEEKDAY関数を入れれば出来るのかと思い試行錯誤しましたが上手く行きません。何か良い案をご教授願えたらと思います。 よろしくお願いします。 ＜ 使用 Excel：Excel2019、使用 OS：Windows10 ＞ ---- 今出来ているカレンダーに少し 手を入れるだけで済ような気がしますが。 （MK） 2023/10/20(金) 14:14:00 ---- もしかして七曜制カレンダーではなく縦一列とか 横一列のカレンダーですか？ （MK） 2023/10/20(金) 14:15:25 ---- >MK様 記載漏れ大変申し訳ございません。 縦1列のカレンダーになります。 （こはだ） 2023/10/20(金) 14:17:21 ---- 参考HPです。 https://358dokari.com/excel-workday-weekday （MK） 2023/10/20(金) 14:22:23 ---- A1:2023 A2:10 B1=WORKDAY(DATE($A$1,$A$2,1),ROW()) 次の月の日付を表示したくない場合は一工夫必要です。 ※これは現状のカレンダーで対応されていると思いますので 省略します。 （MK） 2023/10/20(金) 14:25:40 ---- 式を↓に差し替えてください。 =WORKDAY(DATE($A$1,$A$2,1),ROW()-1) （MK） 2023/10/20(金) 14:28:23 ---- >MK様 ありがとうございます。 ご提示頂いた式にしますと、どうしても1日スタートになりません。 （こはだ） 2023/10/20(金) 14:37:04 ---- 10/1は日曜ですよ？ （MK） 2023/10/20(金) 14:42:44 ---- >MK様 失礼致しました。 11月で作成をしておりました。 （こはだ） 2023/10/20(金) 14:44:22 ---- B1〜に式を入れてますよね？ （MK） 2023/10/20(金) 14:45:14 ---- どのセルから日付を表示させるんですか？ A B 1 2023 10 2 3 10/2 月 4 10/3 火 5 10/4 水 A3 =IFERROR(TEXT(WORKDAY(DATE($A$1,$B$1,0),ROW(A1)),"[<="&DATE($A$1,$B$1+1,0)&"]yyyy-m-d;")*1,"") 表示形式「日付」で下コピー ※実際と位置が違っていても、ROW(A1)の「A1」を変更しないように B3 =TEXT(A3,"aaa") 下コピー ＞次に上記を保ったまま 「上記を保ったまま」の意味がわからないので無視しました。 ところで祝日は表示するんですか？ 以上 （笑） 2023/10/20(金) 14:49:40 ---- ＞=WORKDAY(DATE($A$1,$A$2,1),ROW()-1) これだったら2023年10月の場合、10/1(日)からになりませんか？ 以上、確認だけ （笑） 2023/10/20(金) 15:00:28 ---- 祝日は表示したいです。 提示して頂いた=IFERROR〜の式だと何も表示されません。 =WORKDAY〜も何も表示がされません。 もう一度最初から試してみます。 ありがとうございます。 （こはだ） 2023/10/20(金) 15:17:36 ---- 笑さんの式を試しましたが、きちんと表示されましたよ。 年、月、日付を入力したセルが笑さんが書かれてる通りになってるか 確認してみてください。 （MK） 2023/10/20(金) 15:39:33 ---- >＞=WORKDAY(DATE($A$1,$A$2,1),ROW()-1) > これだったら2023年10月の場合、10/1(日)からになりませんか？ その通りですね・・・。 B1と書いておきながらB2から式を入れて試してました・・・。 （MK） 2023/10/20(金) 15:55:20 ---- 時間が空いてしまい大変申し訳ございません。 やはり何度試しても =IFERROR(TEXT(WORKDAY(DATE($A$1,$B$1,0),ROW(A1)),"[<="&DATE($A$1,$B$1+1,0)&"]yyyy-m-d;")*1,"") こちらの式を入力しても何も表示がされません…。 （こはだ） 2023/10/23(月) 10:02:28 ---- 式をコピペしましたら、笑様の式が反映されました。 スマホで確認したものを打っていましたが、どこか間違えていたようです。 大変失礼致しました。 ただ、B1を１０に変えたところ、赤色に変わるだけで日付が表示されません。 （こはだ） 2023/10/23(月) 10:23:54 ---- ＞ただ、B1を１０に変えたところ、赤色に変わるだけで日付が表示されません。 年、月のセルが違ううと思うので、 「DATE関数、TEXT関数を使って」の数式を提示してみてください。 赤色に変わるとはどういうことですか。 条件書式を設定しているんですか。 （IT） 2023/10/23(月) 15:08:25 ---- 笑様が提示してくださった式を導入しました。 =IFERROR(TEXT(WORKDAY(DATE($A$1,$B$1,0),ROW(A1)),"[<="&DATE($A$1,$B$1+1,0)&"]yyyy-m-d;")*1,"") （こはだ） 2023/10/24(火) 10:05:52 ---- そうじゃなくて貴方が作成したカレンダーのことを言ったつもりでしたが。 理解されなくて残念です。 ＞DATE関数を使って年、月を変更するだけで日付を一括変更、TEXT関数を使って曜日を一括変更出来るようにま ＞ずは作成しました。 このセル番地を示してくださいと言うことです。 貴方が作成したカレンダーはこちらから見えませんので。 （笑） 2023/10/20(金) 14:49:40さんの表と式で問題ありませんでした。 （IT） 2023/10/24(火) 11:47:43 ---- 失礼致しました。 作成した当初は 　　　　　A　　　　　B １　　　2023　　　　10 ２　　　 ３　　　　１　　　　日 ４　　　　２　　　　月 ５　　　　３　　　　火 A３＝DATE(A1,B1,1) A４＝A3+1 B３＝TEXT(A3,"aaa") 上記のように作成しました。 ここから土日のみを抜き、A１やB１の年、月を変更したら一括で日にちと曜日が変わるようなものを作成したいと思っています。 分かりづらかったら申し訳ございません。 （こはだ） 2023/10/25(水) 10:14:39 ---- ＞ただ、B1を１０に変えたところ、赤色に変わるだけで日付が表示されません。 ・何が（どのセルが）赤になるんですか？ ・日付が表示されずに何が表示されるんですか？　何も表示されないってこと？ B列の曜日も？ ・表示されないのは B1が「10」の場合だけ？ 　他の月は表示されるんですか？ ■ついでに･･･ ＞A3 =IFERROR(TEXT(WORKDAY(DATE($A$1,$B$1,0),ROW(A1)),"[<="&DATE($A$1,$B$1+1,0)&"]yyyy-m-d;")*1,"") 　A3 =IFERROR(TEXT(WORKDAY(DATE($A$1,$B$1,0),ROW(A1)),"[<="&DATE($A$1,$B$1+1,0)&"]0;")*1,"") ~~~ 波線部、yyyy-m-d　→　0　でも結果は同じですね。 以上、確認だけ （笑） 2023/10/25(水) 10:53:22 ---- A3セルから下が赤になるんだったら A3セルを選択して、ホーム〜条件付き書式〜ルールの管理を見てください。 何か設定されてませんか？ 以上、追加で確認 （笑） 2023/10/25(水) 11:09:21 ---- A３セルから下が何も表示されず、２０２３年１０月のみでした。 条件付き書式からルールのクリアを行ったところ、問題なく日付、曜日が表示されるようになりました。 お手数おかけしました。 （こはだ） 2023/10/26(木) 10:00:35