『万年カレンダーについて。』(コルム) 次のURL の質問に答えていただけると幸いです。 http://www.excel.studio-kazu.jp/kw/20181011182658.html < 使用 Excel:Excel2013、使用 OS:Windows10 > ---- 理屈だけ分かればいいですね? 以下のサンプルで考えます。 行 _____A_____ _______B_______ _C_ ____D____ 1 日杖 着色したいセル 休日リスト 2 2018/12/31 無 2019/1/1 3 2019/1/1 着色 4 2019/1/2 無 5 ="" ←A5は空白文字とします(B5セルは無色であるべし) B2:B5に条件付き書式を設定します。 条件式は、通常、こうします。           ↓  「 =COUNTIF($D$2:$D$7,A2) > 0 」つまり、A2の日付が「D2:D7」に一つ以上なら「真」になって色が付く訳です。 ただ、これだけでもいいです。何故ならエクセルにおいて、0以外は「真」と判断されるからです。      ↓   「 =COUNTIF($D$2:$D$7,A2) 」 さて、コルムさんの例では、2月30日なんてのは存在しないので、空白文字になっていますね? 空白文字は =COUNTIF($D$2:$D$7,A2) は5を返します。$D$2:$D$7の中に空白が5つあるからです。 なので、A5にも色が付いてしまいます。これはマズいですよね? なので条件式は「A列が空白じゃなく」且つ「日付が休日リストにある」という作りにしないとならない訳です。 設定すべき条件 → =AND(COUNTIF($D$2:$D$7,A2),A2<>"") (半平太) 2018/10/20(土) 20:32 ---- 今までのことを拝見してきました。 コルムさんってよくでたらめなことを平気で書く人なんですね。 回答者さん相手にしない方がいいですよ。 (のりん ) 2018/10/20(土) 15:45 すみません。のりんさん勘違いが多くてすみません。どうか教えていただければと思います。ご不明な点があれば聞いてください。 (コルム) 2018/10/20(土) 18:27 教える気はない。無視する。 (のりん) 2018/10/20(土) 19:45 ----------------- 知恵袋での万年カレンダー https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q10195411285 https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q11195285866 教えてgooでの万年カレンダー https://oshiete.goo.ne.jp/qa/10692302.html https://oshiete.goo.ne.jp/qa/10777331.html https://oshiete.goo.ne.jp/qa/10773352.html https://oshiete.goo.ne.jp/qa/10769159.html ・・・まであるかも知れない・・・・ (菩菩紙御炉) 2018/10/20(土) 21:08 ---- 10/20(土)の12:46に打った数式でうまくいったのです。なぜうまくいったのでしょうか? (半平太)さんの数式ではうまくいきませんでした。詳しく教えていただければと思います。 (コルム) 2018/10/20(土) 21:17 ---- あなたの作成したExcel ファイルをアップロードした方がいいのではないか。たぶん、おかしなところがいっぱいあるファイルになっていると思われるから。 (菩菩紙御炉) 2018/10/20(土) 21:20 ---- >10/20(土)の12:46に打った数式でうまくいったのです。 うまくいったのなら、それでやればいいじゃないですか。私の案に拘ることはないです。 私としても、前のスレッドは何が何だか分からないので、戻る気は起きないです。 条件式の考え方はここで説明しました。 それが理解できれば応用はそんなに難しくないと思いますけど? もし理解できないなら、こっちの簡易なサンプルで質問してください。 (半平太) 2018/10/20(土) 21:35 ---- =COUNTIF ($Y$3:$AA $106,A5)でうまくいきました。 これは、どういう意味があるのでしょうか?教えていただけると幸いです。 (コルム) 2018/10/20(土) 21:54 ---- 「 =COUNTIF($D$2:$D$7,A2) 」 選ぶ部分は、違いますが、これと同じ感じでできました。 祝日一覧に、2/30は入っていませんよ。 2017〜2022年どこにも入っていないのですが。 教えていただけると幸いです。 (コルム) 2018/10/20(土) 22:21 ---- >=COUNTIF ($Y$3:$AA $106,A5)でうまくいきました。 >これは、どういう意味があるのでしょうか? 「$Y$3:$AA$106」の範囲にA5セルと同じデータが幾つあるか数えるものです。 > 「 =COUNTIF($D$2:$D$7,A2) 」 >選ぶ部分は、違いますが、これと同じ感じでできました。 >祝日一覧に、2/30は入っていませんよ。 >2017〜2022年どこにも入っていないのですが。 何が疑問なんですか? 2/30が入っているなんて言っていませんが。 2/30に相当するセルです。そちらの表なら、E34セルです。 そこに空白文字が入っているでしょう? $Y$3:$AA$106には空白が沢山ありますよね? だから、=COUNTIF($Y$3:$AA$106,A5) は1以上の数値が返り「真」と判定されるんです。 そうなったら、E34セルの隣のF34セルにセルに色が着いちゃうんですよ。 それはマズいでしょう? なんで「うまくいきました」なんて言うんですか? (半平太) 2018/10/20(土) 22:47 ---- この質問者に回答するのは時間のムダですよ(^O^)。 (菩菩紙御炉) 2018/10/20(土) 23:46 ---- (半平太)さん、F34には、色は、着いていませんよ。すみません。$Y$3:$AA$106にも 空白があるというのは、どういうことでしょうか?教えていただけると幸いです。 (コルム) 2018/10/21(日) 11:21 ---- 10/20の、20:32では、D列は、空白ですよ。なにもないです。月間の隙間です。教えていただけると幸いです。 (コルム) 2018/10/21(日) 11:49 ---- >$Y$3:$AA$106にも >空白があるというのは、どういうことでしょうか? そのセル範囲が日付で全部埋まっていることはないと考えているんですが? 私の簡易サンプルでは、D列に日付は1つしかないです。残り5セルは空白となる。 なので、=COUNTIF($D$2:$D$7,A2) だけだとB5に色が付いてしまい「うまくいかない」。 一つ確認ですが、A5セルには ="" の数式を入れて、空白文字にしてありますね? >10/20の、20:32では、D列は、空白ですよ。なにもないです。 >月間の隙間です。 10/20の20:32は、私が考え方を説明する目的で作ったサンプルデータです。 「月間の隙間」なんてものはそもそも存在してないです。 そこに表示されているもの(休日リスト・2019/1/1)が全てです。当然、空白じゃないです。 私のサンプルをベースに聞いてください。 ・・と言ったところで、あと何が残っているんですかね? ちょっと前にも言いましたが「うまくいっている」ならそれでやってください。 数式の考え方も説明しました。 何が残っているんですか? (半平太) 2018/10/21(日) 12:08 ---- A5セルには、=A3が入っています。空白文字とはどういうことでしょうか? >$Y$3:$AA$106にも >空白があるというのは、どういうことでしょうか? そのセル範囲が日付で全部埋まっていることはないと考えているんですが? 確かにそうです。 教えていただけると幸いです。 (コルム) 2018/10/21(日) 12:28 ----       , .. .    +      。         ’‘        :] . .. ,   ,:‘.          。             +   ,..  ’‘     +   ,..       . ..; ',   ,:‘       . .; : ’                           ' ,:‘.            あ あ ・ ・ ・       ,:‘.      + .. ' ,:‘.                             . ...:] ’‘ ’‘     .;    こ ん な 馬 鹿 な                                        。 .     。   質 問 を す る 人         ,:‘. 。  '+。                 初 め て で す          .. ' ,:‘. :] . ..                            .. ' ,:‘.   ,   ,:‘.         ..; ',   ,:‘         ’‘            + , .. .              +          ’。  ,:‘. 。   .. . . :]:  ' ,:‘.   , .. .    +  。  , .. .    +  . : :... (猿でもわかるExcel ) 2018/10/21(日) 13:14 ---- >A5セルには、=A3が入っています。 それはコルムさんの表の話ですね? 私のサンプルで考えてください。 >空白文字とはどういうことでしょうか? 例えばこんな数式を入れて、下にコピーしたとしますね。      ↓ A6セル =IF(A5>=C$3,"",A5+1) するといつかはC$3の値以上と言う条件が成立して、つまり「真」となって、 ""←というデータが入ることになります。 それが空白文字です。(長さが0の文字列です。本当の空白ではない) 空白文字は ="" という数式を入れても作れます。 そいつを COUNTIF関数の第二引数にして、セル範囲を数えると空白の数が返ってきます。 実際に自分のシートでテストして、そのことを確認してください。手っ取り早く理解できますよ。  (半平太) 2018/10/21(日) 13:43 ---- 祝日の緑がすべて消えただけなのですが。教えていただけると幸いです。 (コルム) 2018/10/21(日) 16:04 ---- 祝日じゃなければ消えて当然です。何も問題ありません。 (半平太) 2018/10/21(日) 16:38 ---- 2018/10/21(日)13:43分のこと(件)は、こういうことでしょうか? 教えていただけると幸いです。 (コルム) 2018/10/21(日) 16:43 ---- >こういうことでしょうか? 「こういうこと」って何ですか? 祝日なら色が付く、そうじゃなければ色は付かない・・当然でしょう。 何に困っているんですか? (半平太) 2018/10/21(日) 17:32 ---- COUNTIF 関数の第2引数に、′′ ′′を入れて、テストしてください。の回答です。 半平太さんの通りにできたかどうかです。 教えていただけると幸いです。 (コルム) 2018/10/21(日) 17:44 ---- ダブルコーテーションの間に半角もしくは全角の空白文字を入れたのではないかwww ちょっと半平太氏にお聞きしたいが、Excelにおける "" は文字列の最後を意味するいわゆる NULL文字とは違うのかな? (猿でもわかるExcel ) 2018/10/21(日) 18:21 ---- >COUNTIF 関数の第2引数に、′′ ′′を入れて、テストしてください。の回答です。 なんか違うなぁ。これですよ。半角ダブルクォーテーションを2つ続けてください。中間には何も入れない。          ↓          "" >Excelにおける "" は文字列の最後を意味するいわゆる NULL文字とは違うのかな? 分かりません。 通常、エクセルでは空白文字列と呼ばれています。Countblankのヘルプでは以下の表現になっています。 >空白文字列 ("") を返す数式が入力されているセルも計算の対象となります。 あと、私に対して「半平太氏」なんて呼びかけるな。「半平太さん」と言ってくれ。 (半平太) 2018/10/21(日) 19:01 ---- 半平太さんの問いかけの通り′′′′を半角で、打ち込みました。そしたら、祝日の緑(祝日の曜日) のところが消えました。空白の数がかえってくるとはどういうことでしょうか?教えていただけると幸いです。 (コルム) 2018/10/21(日) 19:11 ---- なぜ、COUNTIF ($Y$3:$AA $106,A5)を打っても、F34に、色が、着かなかったのでしょうか?教えていただけると幸いです。 (コルム) 2018/10/21(日) 19:17 ---- >空白の数がかえってくるとはどういうことでしょうか? これについては、説明していますよ。 > >=COUNTIF ($Y$3:$AA $106,A5)でうまくいきました。 > >これは、どういう意味があるのでしょうか? > > 「$Y$3:$AA$106」の範囲にA5セルと同じデータが幾つあるか数えるものです。 A5が空白文字なら、セル範囲に空白が幾つあるか数えることになるんですから、 空白の数が返ってくるんです。 自分でチャンと実験しましたか?(自分で手を動かさないで、聞かないでくださいよ) >なぜ、COUNTIF ($Y$3:$AA $106,A5)を打っても、F34に、色が、着かなかったのでしょうか? それをどこに打ったんですか? 条件付き書式の式はどうなっていますか? (半平太) 2018/10/21(日) 20:24 ---- 条件付き書式の、数式ボックスのところです。 条件付き書式の式は、COUNTIF ($Y$3:$AA$106,A5)です。 教えていただけると幸いです。 (コルム) 2018/10/21(日) 21:15 ---- それは、コルムさんの作った表の話ですよね? どんな具合に出来上がっている表なのか分からないので、深入りは避けたいです。 先ず、私のサンプルデータの方で同種の作業をやってみて、 何かおかしいことが出たら質問してください。 (半平太) 2018/10/21(日) 21:29 ---- おかしいところは、ありませんでした。 教えていただけると幸いです。 (コルム) 2018/10/22(月) 03:58 ---- 次のURL では、sheet 1!A5とかかれていますが、できるとかかれているのですが、 間違いなのでしょうか? https://oshiete.goo.ne.jp/qa/10763894.html 教えていただけると幸いです。 (コルム) 2018/10/22(月) 04:18 ---- 設定すべき条件 → =AND(COUNTIF($D$2:$D$7,A2),A2<>"") 祝日の緑がすべて消えました。(祝日であるべきところも消えました。) 教えていただけると幸いです。 (コルム) 2018/10/22(月) 05:18 ---- >設定すべき条件 → =AND(COUNTIF($D$2:$D$7,A2),A2<>"") >祝日の緑がすべて消えました。(祝日であるべきところも消えました。) 私のサンプル上での話ですね? そうじゃなかったらスルーしますよ。 B2セルを選択してから、条件付き書式コマンド→「ルールの管理」と辿ると出現するダイアログが出ます。 1.適用先はどうなっていますか。  =$B$2:$B$7 となっていればOKです。 2.次にそのダイアログ中にある「ルールの編集」ボタンをクリックしてください。  「数式を使用して、書式設定するセルを決定」というところが選択されていて   数式を入れるボックスに入っている数式がこうなっていればOKです。                  ↓               =AND(COUNTIF($D$2:$D$7,A2),A2<>"") 3.A2:A5の日付と同じ日が「D2:D7」内に一つでもあればOKです。   因みにその日付は何日ですか? 以上が全てOKですか? それなのに色が付かないですか? (半平太) 2018/10/22(月) 15:37 ---- 管理人さんへ 「コルム」というニックネーム投稿全て削除願います。 ( ) 2018/10/22(月) 17:38 ---- こういう風に作りました。 https://fire.st/quFbsw8 教えていただけると幸いです。 (コルム) 2018/10/22(月) 22:09 ---- >こういう風に作りました。 すれ違いの返答は、もう止めて貰えませんか? 前レスの1〜3の質問に答えて頂ければいいんですけど。 (半平太) 2018/10/22(月) 22:33 ---- なんで条件付き書式の数式が全部 =COUNTIF($Y$3:$AA$106,A5) これなんですか? どういう風にしたら、こうなるのか見当もつかない。 人に聞いてばっかりだから、こんな風になっちゃってるのかと思う。 ちゃんと、条件付き書式の勉強をした方がいいよ。 私の見方が変なのかもと思ってしまった。 これが最後の返信だけど。 ああ、そうかめんどいから、数列選択して設定したのか・・・。 $AA$106まで必要ないけど? $Y$107 ルール管理で、緑を矢印ボタンで1番上に移動。 優先順位が上から下になってるので。 (BJ) 2018/10/22(月) 22:48 ---- はい。つきません。1,2,3の通りにしました。 ところで、自分の作ったカレンダーでおかしなところがあれば、教えていただけると幸いです。 https://firestorage.jp/me/link/7drm9pu1bdf10uljo4 (コルム) 2018/10/22(月) 23:41 ---- エラーが出たので、貼りなおします。間違いがあれば教えていただけると幸いです。 https://fire.st/9Il0GsR (コルム) 2018/10/23(火) 07:31 ---- 私のサンプルで何が旨くいってないのか突き止めるのが先決です。 私のサンプルデータが入ったシートの「シート見出し」を右クリックして、「コードの表示(V)」を選ぶと 画面中央に白いエリアが表れます。 その白いエリアに後記マクロ(investgation)をコピぺし、F5キーを押下してください その後、ALTキー + F11キーを押して、エクセルに戻ってください。 すると、F:G列にそちらの状況を表すデータが書き出されていますので、 そのデータが入った範囲をコピーしてこの掲示板に貼り付けてください。 ’貼り付けてから、F5キーを押下するマクロ ’ ↓ Sub investgation() Dim cel As Range, a As FormatCondition Dim RW As Long For Each cel In Range("A2:A7,D2:D7") If Not IsEmpty(cel.Value) Then RW = RW + 1 Cells(RW, "F").Value = cel.Address Cells(RW, "G").Value = TypeName(cel.Value) & "#" & cel.Value & "#" End If Next For Each a In Me.Cells.FormatConditions RW = RW + 1 Cells(RW, "F").Value = "'" & a.Formula1 RW = RW + 1 Cells(RW, "F").Value = a.Interior.Color & " P=" & a.Priority Next End Sub (半平太) 2018/10/23(火) 09:55 ---- 私のサンプルデータが入ったシートの「シート見出し」を右クリックして、「コードの表示(V)」を選ぶと 画面中央に白いエリアが表れます。 何処でしょうか?教えていただけると幸いです。 (コルム) 2018/10/23(火) 12:26 ---- ディスプレーの真ん中です。 いつもはエクセルのシートが見えている位置です。 (半平太) 2018/10/23(火) 12:36 ---- $A$4 String#日# $A$5 $A$6 Date#2019/07/02# $A$7 Date#2019/07/03# ="日" 255 P=1 ="土" 15123099 P=2 ="日" 255 P=3 ="土" 15123099 P=4 ="日" 255 P=5 ="土" 15123099 P=6 ="日" 255 P=7 ="土" 15123099 P=8 ="日" 255 P=9 ="土" 15123099 P=10 ="日" 255 P=11 ="土" 15123099 P=12 =COUNTIF($Y$3:$AA$106,A5) 5287936 P=16 水 木 金 土 こういうことでしょうか?教えていただけると幸いです。 (コルム) 2018/10/23(火) 14:01 ---- おー、ようやくまともな答えが返ってきたー。 それを見ると私のサンプルデータでやってないですね。 前回、こう質問していますが、 >   数式を入れるボックスに入っている数式がこうなっていればOKです。 >                  ↓ >               =AND(COUNTIF($D$2:$D$7,A2),A2<>"")                 =COUNTIF($Y$3:$AA$106,A5)   ↑      こんなのが入っています。話が違いますよ? 第一、A列に何で7月のデータが入っているんですか? そっちの表だとしても、今、1月から6月の表を作っているんでしょう? おかしいじゃないですか・・ (半平太) 2018/10/23(火) 14:16 ---- このカレンダーは、切り替えが、できて、7月開始カレンダーにしてしまいました。 表というのは、どういうことでしょうか?祝日一覧の表ですか?それとも、1〜6月の表ですか? もう表は、すでに作ってありますよ。7:31のエクセルのデータを見ていただきたいです。 教えていただけると幸いです。 (コルム) 2018/10/23(火) 16:14 ---- 話がズレてしょうがないので、以前、こう警告しましたよね? > 私のサンプル上での話ですね? > そうじゃなかったらスルーしますよ。 なのでスルーします ・ ・ と云うのも悪いので、ちょっと教えて下さい。 条件付き書式は、全部でいくつ設定されているんですか? 以前14件なんて言ってましたが、無意味な設定を含めてそんなになっただけですよね? 私としては、土・日・祝の3種類だけだと思っているんですが、どうなんでしょうか? (半平太) 2018/10/23(火) 16:36 ---- 今は、条件付き書式を、1件削除して、13件です。 土・日を、1月(B列)に、1つの条件つき書式のように、1ずつルールを作っていきました。 そうです。3種類です。あの、7:31のは、ご覧になりましたか?アップロードしたものを、送ったのですが。 (コルム) 2018/10/23(火) 19:03 ---- >今は、条件付き書式を、1件削除して、13件です。 >土・日を、1月(B列)に、1つの条件つき書式のように、1ずつルールを作っていきました。 そんなに必要ありません。3件でいいんです。 今回は手っ取り早くマクロで条件付き書式を設定することにします。 そちらで作った2019年7月のブックのコピーを作り コピーしたブックを使って以下の設定テストをしてみてください。 1.コピーしたエクセルブックを開く 2.目的の表があるシートの「シート見出し」を右クリックして、「コードの表示(V)」を選ぶ。   画面中央に白いエリアに後記マクロ(FormatCond)をコピぺし、F5キーを押下する。      その後すぐに、Ctrlキー + Zキー を押下する(元に戻す意味があるので、貼り付けたコードは消えます)、   その後、ALTキー + F11キーを押す。するとエクセルに戻れます。 3.以上で条件付き書式の設定は終了です。実際に目で確認してください。   もし、色が付かなかったら、一旦保存→ブックを閉じる→再オープン としてみてください。 Sub FormatCond() Me.Cells.FormatConditions.Delete With Range("B5:B35,F5:F35,J5:J35,N5:N35,R5:R35,V5:V35") .FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, Formula1:="=""土""" .FormatConditions(.FormatConditions.Count).SetFirstPriority With .FormatConditions(1).Interior .Color = 15773696 End With .FormatConditions(1).StopIfTrue = False .FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _ Formula1:="=""日""" .FormatConditions(.FormatConditions.Count).SetFirstPriority With .FormatConditions(1).Interior .Color = 255 End With .FormatConditions(1).StopIfTrue = False .FormatConditions.Add Type:=xlExpression, Formula1:= _ "=AND(COUNTIF($Y$5:$AB$35,A5),A5<>"""")" .FormatConditions(.FormatConditions.Count).SetFirstPriority With .FormatConditions(1).Interior .Color = 5296274 End With .FormatConditions(1).StopIfTrue = False End With End Sub (半平太) 2018/10/23(火) 19:36 ---- 残念ながら、ダメでした。すみません。どうすればよいのでしょうか?教えていただけると幸いです。 (コルム) 2018/10/24(水) 12:58 ---- ちょっと確認です。 設定されている条件付き書式の数は幾つになりましたか? (半平太) 2018/10/24(水) 13:14 ---- すいません回答ではありません。 お世話になってるくろです。 私も詳しくないので時間があるときにここを覗いて仕事で役立ちそうなものを参考にさせてもらってます。 (コルム) 2018/10/23(火) 07:31 のエクセルをダウンロードして (半平太) 2018/10/23(火) 19:36 をやってみましたができましたよ(条件書式が3件になった)  祝日は$Y$5:$AB$35の範囲内は2017なので変更しないとだめですが。 コルムさんがどの程度エクセルの知識があるのかは不明ですが、半平太さんのこの説明が再現できる程度の知識がないと中々難しいと思います。 (くろ) 2018/10/24(水) 13:54 ---- もう一度やってみた結果、土曜日と、日曜日には、色がつきましたが、祝日には、色がつきませんでした。 くろさんの方は、どうでしたか? (コルム) 2018/10/24(水) 14:44 ---- 条件付き書式のルールは、3件あります。しかし、エクセルを再起動しても、祝日だけ色がつきません。教えていただけると幸いです。 (コルム) 2018/10/24(水) 14:54 ---- 祝日リスト範囲(Y$5:$AB$35)にチャンと祝日日付が入っていないと、色は付きませんよ。 (半平太) 2018/10/24(水) 15:26 ---- コルムさん >祝日は$Y$5:$AB$35の範囲内は2017なので変更しないとだめですが。 と書いてあるとおり変更しないと色はつきませんよ。 コルムさんが書いている祝日の中で2019年はY40〜Y58ですよね?これを範囲内に変更しないとだめです。 条件書式の行番号を変更するといいと思います。 (くろ) 2018/10/24(水) 15:56 ---- >2019年はY40〜Y58 それ本当?  コルムさんは、人の言う事を全然聞いてない人ですねぇ。 なら、これで範囲を広げてください。           ↓ =AND(COUNTIF($Y$5:$AB$1000,A5),A5<>"") (半平太) 2018/10/24(水) 16:30 ---- 範囲内に変更しても色がつきません。どうすればよいのでしょうか? 教えていただけると幸いです。 アップロードしました。 どこが間違っているのか教えていただけないでしょうか? https://fire.st/yHoqiIM (コルム) 2018/10/25(木) 11:12 ---- 半平太さんはダウンロードのデータを見られそうにないので (コルム) 2018/10/23(火) 07:31 のときの表の書式が違っているんだけど (半平太) 2018/10/23(火) 19:36 を参考にエクセルをコピーして作成したのだろうが、 なぜコピーして作成したデータのセルの書式や日付の書式が変わっているのか コルムさんはどうやってこのデータを作成したの 間違いはセルのデータが1・2とただの数字になってしまっているから 2019/7/1 などに直せばいい アップロードしてもらったデータを直しても意味がないので、どうやってエクセルデータをコピーしてアップロードしたエクセルデータを作成したのか教えてください (ddd) 2018/10/25(木) 12:00 ---- 普通に元の万年カレンダーを祝日一覧まで範囲選択をし、右クリックで、コピーを選んで、新しいエクセルブックに貼り付けました。それだけのことなのですが。ご不明な点があれば聞いてください。教えていただけると幸いです。 (コルム) 2018/10/25(木) 12:15 ---- > アップロードしました。 カレンダーの「日」列のデータが単なる【数値(1〜31)】になっていてシリアル値ではない。 祝日リストの「日付」列はシリアル値なので、一致する筈がない。 それに、COUNTIF の祝日範囲($Y$5:$AB$35)に「曜日」列(Z列)と「祝日名」列(AA列)を 含める必要なし。加えて空列のAB列まで加えてるって何? 祝日日付の1列(Y列)のみとすべき。 また、「曜日」列が全て手打ちで固定文字列って有り得ない。 普通は日付(シリアル値)から、 関数[ =TEXT(A5,"aaa") ] もしくは書式[ =A5 で 書式 "aaa" ]で作る。 カレンダーの年(C1)と月(A3,E3, …)は文字列("2019年","7月","8月, …)ではなく 数値(2019, 7, 8, …)とすべき。"年"/"月" 表示は書式で[ 0"年", 0"月" ]にすれば良い。 そうすれば、「日」列のシリアル値を[ =DATE($C$1,A$3,ROW()-4) ]で作れる。 書式は [ d ]にすれば[日]表示だけになる。 この場合、土日の青赤表示の条件付書式はWEEKDAY関数[ WEEKDAY(A5) ]による判定式に変える。 土曜は7、日曜は1。 年&月が文字列で手打ち固定、日の列も1〜31の数値で手打ち固定。 曜日も"日"〜"土"の文字で各月の列に各々手打ちで固定。 ハッキリ言って、これなら、態々、条件付き書式を使って色を付ける必要なし。 手作業で色を付ければ十分です。 最後に、2019年に天皇誕生日(12/23)はありません。 (AddinBox 角田) 2018/10/25(木) 13:02 ---- 元の万年カレンダーブックをコピーして作成して行ってください。 そのコピーだとコピー時に 貼り付け先に合わせてコピー などでコピーすると日付などがアップデータのようになってしまいます 元の万年カレンダーのブックをコピーしてもう一度 2018/10/23(火) 19:36 の処理を行ってください (ddd) 2018/10/25(木) 13:04 ---- どうやってコピーすればよいのでしょうか? 教えていただけると幸いです。 (コルム) 2018/10/25(木) 13:21 ---- なぜかAddinBox 角田さんの回答を無視しているようですが、AddinBox 角田さんの方法は 試してみましたか? (bi) 2018/10/25(木) 13:52 ---- それにしても、これのどこが万年カレンダーなのだ。  万年とは言わんが、せめて100年前後程度には対応していないと。  何のためにこんなアフォな Excel の使い方するんだろうな? (ぼぼぼぼぼ) 2018/10/25(木) 13:59 ---- このコピーしてが通じないとは思わなかった。 名前を付けて保存で別ファイルを作るか、ファイルを閉じた後エクセルファイルをコピーしてください。 これで通じなかったら私には導けません。 (ddd) 2018/10/25(木) 14:15 ---- 興味本位で投稿するのはやめろ ( ) 2018/10/25(木) 14:28 ---- >範囲内に変更しても色がつきません。どうすればよいのでしょうか? 変更していないから変わらないのだと思います。 条件書式の数式が半平太さんの 「 =AND(COUNTIF($Y$5:$AB$1000,A5),A5<>"") 」になってますか? 変更のやり方が分からないならネットで調べてください。そのほうがここで聞くより画像があるので分かりやすいです。 (コルム) 2018/10/23(火) 07:31 の条件書式を=AND(COUNTIF($Y$5:$AB$1000,A5),A5<>""に変更して色が付くか確認してください。 色の付けたい祝日が入ってるセルが$Y$5:$AB$1000の範囲内なら色が付きます。 勝手にレイアウトや書式を変えるならご自分で範囲を変更するしかありません。 (くろ) 2018/10/25(木) 15:09 ----  コルム君が関係しているQ&Aは、お笑い脚本として吉本興業に売れるかも知れない。 (吉本興業マネージャー) 2018/10/25(木) 18:46 ---- ありがとうございました。できました。感謝します。 (コルム) 2018/10/26(金) 14:33