日曜、祭日をカウントする
勤務表をweekday関数で月間カレンダーをsheet1に作成しております。
別のshee2に祭日を作成して、条件つき書式でsheet1に日曜・祭日は赤になるように設定しました。赤色をカウント(VBAで作成)しようしても、条件付き書式では、赤をカウントしません。セルを選択後、塗りつぶしたセルはカウントしますが。
祭日.日曜日の勤務時間合計を計算したいのです。
row1列に2009/4/1から2009/4/30まで入力
row2列に(=text(A1,"aaa")で曜日入力してます。
row3列に時間を入力しております。
column1行には担当者指名入力しています。
日曜祭日にはrow1で日曜。祭日は赤に塗りつぶします。
よろしくお願いします。
※条件つき書式の塗りつぶしの色とセルの塗りつぶしは違うのでしょうか?回答いただいた自作のFunction関数を使用しました。