当直勤務シフトの作成

質問

年間365日毎日順番で当直があります。その中で会社指定の土日祝休日と平日と大型連休のシフトをそれぞれの順番を分けて表示したいです。簡単な表を添付しました、担当者はa～s、平日は白、休日は赤、大型連休は緑にしました。このシフト表を関数で表したいです。表はこんな感じなのですが月も曜日も簡単に作成出来たらと思っています。よろしくお願いします。

回答No.4

bunjii

>塗りつぶしの部分の意味が少しわかりません。
>どこのセルに条件付き書式を返すのでしょうか？色の設定など？
関数式が条件付き書式を返すのではありません。
選択したセル範囲に条件付き書式を設定します。
B1からQ7までが1ヶ月分ですから何ヶ月分を作成するかで選択範囲が異なります。
例えば8月から翌年3月までとすればB1:Q56を選択して「条件付き書式」を「新しいルール」で実行し、「数式を使用して、書式設定するセルを決定」を選択します。
数式入力欄へ回答No.3で提示した数式を入力します。
その後、「書式」ボタンをクリックして塗りつぶしの色を指定します。
同じセル範囲に複数の条件を指定できますので、目的に合わせて設定してください。
今回の添付画像は大型連休の条件付き書式の設定ダイヤログです。

お礼

大変わかりやすかったです、本当に助かりました。ありがとうございました。

回答No.3

bunjii

>簡単な表を添付しました、
添付画像が読めません。

>このシフト表を関数で表したいです。
何ヶ月分を作成しますか？

>表はこんな感じなのですが月も曜日も簡単に作成出来たらと思っています。
関数で担当者の割り付けはできませんのでカレンダー（未割り付けの表）を作成しても無意味かと思います。
カレンダーの形はA1～Q7が1ヶ月分です。
A1:A4はセルの結合で1つにします。入力の値は日付の2016/8/1とし、表示形式は m"月" にしました。
B1セルには =A1 という代入式を設定し、表示形式を d"("aaa")" としました。
C1セルに =IF(B1<$A1+14,B1+1,"") という数式を設定して表示形式をB1と同じに設定し、これをQ1セルまでオートフィルコピーします。
B3セルは =A1+15 で、C3セルは =IF(B3<EOMONTH($A1,0),B3+1,"") とし、表示形式はB1セルと同じにします。C3セルをオートフィルでQ3セルまでコピーします。
セルの塗りつぶしは条件付き書式で設定します。
塗りつぶしについては次の数式を使用します。
日曜日 =WEEKDAY(B1)=1
祝日 =AND(COUNTIF($T:$T,B1),B1<>"") T列に祝日一覧を記載します。
会社指定の大型連休 =AND(COUNTIF($U:$U,B1),B1<>"") U列に大型連休の一覧を記載します。
会社指定の土曜休日については大型連休の方法を準用すればセルの塗りつぶしが可能になるでしょう。
1ヶ月分ができたら、その範囲を選択して下へコピー＆ペーストで増やしてください。

補足

回答ありがとうございます！塗りつぶしの部分の意味が少しわかりません。
どこのセルに条件付き書式を返すのでしょうか？色の設定など？

回答No.2

neKo_quatre

月や日にちが途中で折り返してると、処理がめんどくさいです。
縦か横に1/1～12/31まで365日並べた表を作った方が良いです。
で、質問文の表には、そっちの表から表示すべき色の番号なりを持ってくる。

祝日は、別の表なんかで一覧にしときます。
大型連休ってのを別扱いにするなら、そちらも別の表にするか、休日と祝日がいくつ続いたら色変えるか決めとくとか。

まずは、フツーに曜日と祝日に対応するカレンダー作ってみては。

Excel 2013でカレンダー作成！ 祝日や曜日を色分けするには？ - 週刊アスキー
http://weekly.ascii.jp/elem/000/000/221/221941/
エクセルでカレンダー【祝日を表示編】
http://kokoro.kir.jp/know/calendar3.html
Excelカレンダー 土日と祝日の背景色を変えるカレンダー～Excel関数技
http://kokodane.com/2013_kan_065.htm

回答No.1

catpow

>>表はこんな感じなのですが月も曜日も簡単に作成出来たらと思っています。よろしくお願いします。

ＶＢＡでそういう処理を行ってくれるプログラムを作ってください。
そうすれば、月、曜日や色が簡単に表示されるようになります。