エクセル 週ごとの日数が出したい。

月曜から日曜までを１週とする場合の
週毎の日数が知りたいです。

C2
=DATE(2014,3,1)

B6
=$A$2+1

C5
=TEXT(B5,"aaa")

よろしくお願いします。

No.7 ベストアンサー 回答者： kagakusuki 回答日時： 2014/03/13 00:54

　回答No.4です。

　済みません、「2014年3月」等の様に、年月が入力されているセルとして参照しているセルが、回答No.4の関数においてはC2セルではなく、C3セルになっておりました。
　後それから、C2セルに入力されている関数が、例えば、

=DATE(2014,3,2)

等の様に、その月の"1日以外の日付"を返す様なものとなっていた場合(表示だけは「2014年3月」のままになります)には、誤った日数を返してしまう事に、後から気付きました。
　ですから、第1、第5、第6週の日付を求める関数を次の様に改良致しました。(第2週目、第3週目、第4週目の日数を求める関数に関しては変更する必要は御座いません)


【第1週目の日数を求める関数】

=IF(ISNUMBER(1/DAY($C$2)),7-WEEKDAY(TEXT($C$2,"yyyy/m"),3),"")


【第5週目の日数を求める関数】

=IF(ISNUMBER(1/DAY($C$2)/(TEXT($C$2,"yyyy/m/")&29-WEEKDAY(TEXT($C$2,"yyyy/m"),3))),MIN(7,DATE(YEAR($C$2),MONTH($C$2)+1,1)-DATE(YEAR($C$2),MONTH($C$2),29-WEEKDAY(TEXT($C$2,"yyyy/m"),3))),"")


【第6週目の日数を求める関数】

=IF(ISNUMBER(1/DAY($C$2)/(TEXT($C$2,"yyyy/m/")&36-WEEKDAY(TEXT($C$2,"yyyy/m"),3))),MIN(7,DATE(YEAR($C$2),MONTH($C$2)+1,1)-DATE(YEAR($C$2),MONTH($C$2),36-WEEKDAY(TEXT($C$2,"yyyy/m"),3))),"")


　因みに、私の方法と、回答No.2様の方法の場合は、C2セルに年と月を指定する値が入力されてさえいれば、各週の日付をそれぞれ独立して求める事が出来ますので、質問者様の添付画像の例に写っている様な、B列の「日付」欄やC列の「曜日」欄等の、補助列は必要御座いません。
　尚、私の方法では、存在しない週の所には何も表示されない様になっております。

この回答へのお礼

ありがとうございます！
分かりやすい説明で助かりました！

お礼日時：2014/03/14 11:57

No.6 回答者： bunjii 回答日時： 2014/03/12 19:22

添付の画像を無視させて頂きます。

>月曜から日曜までを１週とする場合の週毎の日数が知りたいです。
C2セルに月の初日が入力されていることを条件とします。

第1週の日数はその月の8日から初日のWEEKDAY関数からの返り値を差し引けば良いでしょう。

E5=8-WEEKDAY($C$2,2)

第2週から第4週は7日の固定となります。

第5週以降は次の式で算出できます。
質問の例では第6週まであります。

E9=IF(SUM(E$5:E8,7)<DAY(EOMONTH($C$2,0)),7,IF(SUM(E$5:E8)=DAY(EOMONTH($C$2,0)),"",WEEKDAY(EOMONTH($C$2,0),2)))

Excel 2013で検証しましたがExcel 2007でも同様に算出できると思います。

No.5 回答者： tom04 回答日時： 2014/03/12 18:36

こんにちは！

すでに色々回答は出ていますので、参考程度で・・・
作業用の列を使う方法です。

すでに数式をお考えのようですので、余計なお世話かもしれませんが、
↓の画像で
B5（セルの表示形式はユーザー定義から　d　としています）に
=IF(MONTH(C$2+ROW(A1)-1)=MONTH(C$2),C$2+ROW(A1)-1,"")

C5セルに
=IF(B5="","",TEXT(B5,"aaa"))

という数式を入れ、B5・C5を範囲指定　→　C5セルのフィルハンドルで31日までの35行目までオートフィルでコピー！

作業列のG4セルには単に
=ROW()

G5セルに
=IF(OR(B5=EOMONTH(C$2,0),C5="日"),ROW(),"")
という数式を入れ35行目までコピーしておきます。

最後にE5セルに
=IFERROR(SMALL(G:G,ROW(A2))-SMALL(G:G,ROW(A1)),"")
という数式を入れオートフィルで下へコピー！

これで画像のような感じになります。m(_ _)m

No.4 回答者： kagakusuki 回答日時： 2014/03/12 17:27

　第1週目の日数を求める関数の一例は

=IF(ISNUMBER(1/DAY($C$3)),7-WEEKDAY($C$3,3),"")

です。


　第2週目、第3週目、第4週目の日数を求める関数一例は

=IF(ISNUMBER(1/DAY($C$3)),7,"")

です。


　第5週目の日数を求める関数一例は

=IF(ISNUMBER(1/DAY($C$3)/(TEXT($C$3,"yyyy/m/")&29-WEEKDAY($C$3,3))),MIN(7,DATE(YEAR($C$3),MONTH($C$3)+1,1)-DATE(YEAR($C$3),MONTH($C$3),29-WEEKDAY($C$3,3))),"")

です。


　第6週目の日数を求める関数一例は

=IF(ISNUMBER(1/DAY($C$3)/(TEXT($C$3,"yyyy/m/")&36-WEEKDAY($C$3,3))),MIN(7,DATE(YEAR($C$3),MONTH($C$3)+1,1)-DATE(YEAR($C$3),MONTH($C$3),36-WEEKDAY($C$3,3))),"")

です。

No.3 回答者： chie65535 回答日時： 2014/03/12 16:31

追記。

ANo.1の回答の方が簡単ですが、ANo.1の回答は、１～３週目の日数が判らないと４週目の日数が判らない、１～４週目の日数が判らないと５週目の日数が判らない、１～５週目の日数が判らないと６週目の日数が判らないので、単独では計算できません。

当方の回答は複雑ですが、その代わり、それぞれを単独で計算できます。

あとANo.1の回答は「４週目の日数」を計算してますが、４週目の日数は「常に7日」なので計算する必要はありません。

一応、2010年1月～2037年12月の28年分で検証しましたが、どちらも答えが一致しました（曜日と日付の組み合わせは28年周期で循環するので28年分だけ試せばよい）

No.2 回答者： chie65535 回答日時： 2014/03/12 16:07

１週目は

=MOD(8-WEEKDAY(TEXT(C2,"yyyy/mm/")&"01"),7)+1

の式で計算できます。

２～４週目は「7」で固定です。

問題は、5、6週目。月によって、４週しかなかったり、５週しか無かったり、６週あったりします。

その月が何週あるのかは「末日の週番号から初日の週番号を引く」事により求められます。

最後の週（５週目か６週目のどちらか）は「翌月の初日の曜日」から計算できます。

５週目は

=CHOOSE(WEEKNUM(TEXT(DATE(YEAR(C2),MONTH(C2)+1,1)-1,"yyyy/mm/dd"),2)-WEEKNUM(TEXT(C2,"yyyy/mm/")&"01",2)-2,0,MOD(WEEKDAY(TEXT(DATE(YEAR(C2),MONTH(C2)+1,1),"yyyy/mm/dd"))+4,7)+1,7)

の式で計算できます。

６週目は

=IF(WEEKNUM(TEXT(DATE(YEAR(C2),MONTH(C2)+1,1)-1,"yyyy/mm/dd"),2)-WEEKNUM(TEXT(C2,"yyyy/mm/")&"01",2)<>5,0,MOD(WEEKDAY(TEXT(DATE(YEAR(C2),MONTH(C2)+1,1),"yyyy/mm/dd"))+4,7)+1)

の式で計算できます。

なお「５週目が無い（４週しかない）」や「６週目が無い（５週しかない）」と言う場合、存在しない週は「0」になります。

No.1 回答者： mshr1962 回答日時： 2014/03/12 15:26

当月1，2日が日曜の場合、第6週がある可能性もあります。

E5=8-WEEKDAY(DATE(YEAR($C$2),MONTH($C$2),0))
E6=7
E7=7
E8=MIN(DAY(DATE(YEAR($C$2),MONTH($C$2)+1,0))-SUM(E5:E7),7)
E9=MIN(DAY(DATE(YEAR($C$2),MONTH($C$2)+1,0))-SUM(E5:E8),7)
E10=MAX(DAY(DATE(YEAR($C$2),MONTH($C$2)+1,0))-SUM(E5:E9),0)