- 締切済み
特定の曜日は何日?
- みんなの回答 (5)
- 専門家の回答
みんなの回答
- imogasi
- ベストアンサー率27% (4737/17068)
#3です。処理回数・計算を減らすため Function wn1(a, b, c) k = 0 W = Weekday(a) ' MsgBox W If W > c Then a = a + 7 - (W - c) Else a = a + c - W End If For i = a To b Step 7 k = k + 1 MsgBox i Next i wn1 = k End Function に改良します。 名前を wn1 と改めたので、式は =wn1(a2,A3,3) --- 上記を関数化すると 火曜日は3なので、下記に3が現れている。木曜なら5です。 =IF(WEEKDAY(A2)>3,INT((A3-(A2+7+3-WEEKDAY(A2)-1))/7),INT((A3-(A2-WEEKDAY(A2)+3-1))/7))
素朴にこんな式でも。 A1:開始日(シリアル値) A2:終了日(シリアル値) A3:求める曜日の番号(日:1,月:2,火:3,水:4,木:5,金:6,土:7) =INT((A2-A1+1)/7)+(MOD(A3-WEEKDAY(A1),7)<MOD(A2-A1+1,7)) 期間の日数は A2-A1+1 です。 期間の全ての日について判定しなくても、どうせ[日数を7で割った商]+0 or +1 ですから 開始日から[日数を7で割った余り]の日数分について、 求める曜日が含まれるかどうか判定すれば済みます。 Excel2003で動作確認済
お礼
回答ありがとうございます。 助かりました。
- imogasi
- ベストアンサー率27% (4737/17068)
1年きっちり1/1-12/31とかでない場合は ユーザー関数で、FROM日付からTO日付までWeekday関数で火曜日3(デフォルトの場合)の日にちを勘定すればよい。 標準モジュールに Function wn(a, b, c) k = 0 For i = a To b If Weekday(i) = c Then k = k + 1 ' MsgBox i End If Next i wn = k End Function ワークシートには A2 2007/8/5 A3 2007/8/28 の場合 =wn(A2,A3,3)を入れる。 結果 4
お礼
回答ありがとうございます。 助かりました。
- zap35
- ベストアンサー率44% (1383/3079)
#01です。先ほどの回答では少しつまらないですね。汎用的な式にしました A1に開始日(2007/1/1)、B1に終了日(2007/12/31)、C1に数えたい曜日(日,月,火,水,木,金,土のいずれか)を入力して、適当なセルに以下の式を貼り付けてください。この式なら任意の期間の曜日をカウントします =SUMPRODUCT((WEEKDAY(A1+ROW(INDIRECT("A1:A"&(B1-A1+1)))-1)=FIND(C1,"日月火水木金土"))*1)
お礼
回答ありがとうございます。 助かりました。
- zap35
- ベストアンサー率44% (1383/3079)
計算式ですか? まず1年は365日ですが、 365日=7日×52週+1日 です。従って1月1日の曜日だけが53回出現し、その他の曜日は52回出現します。 2007/1/1の曜日は =WEEKDAY("2007/1/1"*1) で求められますが結果は2(月曜日)です。(日月火水木金土が1,2,3,4,5,6,7になる) ですから火曜日も日曜日も52回出現します。計算するほどのことではありません。 質問の意図が違う場合は補足してください
お礼
回答ありがとうございます。 例を一年間にしたのですが、実際は特定されていない期間です。質問がわかりにくくすみません。
関連するQ&A
- エクセル 曜日の計算
特定した期間中の、曜日を数えたいのですが、 簡単な方法をおしえてください。 自分では、最初に調べたい期間を表示させておいて 月曜日は1、火曜日は2として、WEEKDAY(A1,2)で 月曜日が何日、火曜日が何日と計算させたのですが これだと期間が1年の場合、とても面倒です。 何かよい方法をおねがいします。
- ベストアンサー
- オフィス系ソフト
- 【再アンケート】好きな曜日は何ですか?
2021年10月28日に投稿した「好きな曜日は何ですか?」の再アンケートです。 好きな曜日は何ですか? 1.月曜日 2.火曜日 3.水曜日 4.木曜日 5.金曜日 6.土曜日 7.日曜日 僕は、5の金曜日と7の日曜日が好きです。 皆さんの好きな曜日は何ですか?
- ベストアンサー
- アンケート
- 好きな曜日は何ですか?
好きな曜日は何ですか? 1.月曜日 2.火曜日 3.水曜日 4.木曜日 5.金曜日 6.土曜日 7.日曜日 僕は、5の金曜日と7の日曜日が好きです。 皆さんの好きな曜日は何ですか?
- ベストアンサー
- アンケート
- 月、日、曜日というのはいつからはじまったの?
小学生の娘から質問されて答えられなくて、助けてほしいのです。今年のクリスマスが何曜日かという話をしていました。そこから、「そもそも西暦1年1月1日は何曜日なのか?」ときかれました。「おそらく日曜日だと思うけど」とこたえましが、自信がありません。「いつから月日、曜日ってはじまったの?どうしてはじまったの?」それぞれの国で、それぞれの暦があると思いますが、それぞれ教えていただければと思います。 よろしくお願いします。
- ベストアンサー
- 伝統文化・風習
- 月・日・曜日から西暦を特定する方法
月・日・曜日から西暦何年かを特定したいのですが、計算方法や昔の暦などをご存知の方、いらっしゃいませんか?具体的には、4/17(火)が何年だったのか、調べたいのです。話の内容からして、場所はNY、時代は1915-1930前後ではないかと思っています。どうぞよろしく御願い致します。
- ベストアンサー
- 歴史
- エクセルで日付から特定曜日を除いた数(稼働日数等)
B列3行目以降 C列 日付 日付間隔 H23年6月21日(火) - H23年6月22日(水) 1 ・・・B4-B3 H23年8月2日(火) 41 ・・・B5-B4 H23年8月31日(水) 29 ・・・B6-B5 ・ ・ ・・・・今は単純に日付の間隔 ・ ・ ・ ・ 日付入力は2011/6/21 B列表示形式はge"年"m"月"d"日"(aaa) 日付間隔は=IF(OR(ISBLANK(B3),ISBLANK(B4)),"",DATEDIF(B3,B4,"d")) の式をネットで調べて いれています。 行いたいのは、B5---B4(8月2日から6月22日)間などの各上下間の日曜日などの特定曜日を除いた 数値(ここでは実稼働日数)を出したいです。 特定曜日が日曜日以外に土曜日と日曜日とか祝日とかもありますが、 ・・・・かなり複雑かなと思います(別シートにカレンダー表などが必要かと)。 とりあえずは毎週の日曜日です。 日付の入力日は不特定日です。行間に空白はありません。 エクセル素人につき<WEEKDAY(シリアル値,種類)>などをどのように利用して 良いか分かりません。エクセル2000です。 質問内容がお分かりにくいかと思いますが アドバスの程よろしくお願いします。
- 締切済み
- オフィス系ソフト
- 特定の曜日の時に、特定の表示がしたい
XP、エクセル2010です A1にTODAY関数で今日の日にちを表示しています。 平成○年○月○日(○)と表示させています。 特定の曜日の時…、例えば(月)(水)(金)の時に B1に「測定日」と表示させるには、どうしたらいいでしょうか? また(火)(木)(土)の時には、別の表示をさせることも可能でしょうか?
- 締切済み
- オフィス系ソフト
- 曜日当て
生年月日が与えられた時、その曜日を当てる公式を作りたいです。1月1日が何曜日か分かった時、その年の月日が与えられた時の曜日の当て方は知ってます。下のは、途中まで自分で作ったけど途中で挫折したもので全く正確ではありません。こんな風に作ってほしいってやつです。 求める曜日 =1月1日が火曜日の時の求める月日 + (20-求める西暦の上2桁)日 +(求める西暦の下2桁÷7の余り)日 +((求める西暦の下2桁)÷4の商)日 +(求める西暦が4の倍数の1、2月なら-1)日 +(求める生年月日が100n年の1、2月なら+1)日 語彙力なくてすみません。伝わった方ご回答くださったら嬉しいです!
- ベストアンサー
- 数学・算数
- レポート 特定の曜日に色づけ
ラベルとテキストボックスの色を特定の曜日に色づけをしたいのですが できますでしょうか? 日曜日を赤 土曜日を青としたいのですがお願いいたします。
- ベストアンサー
- オフィス系ソフト
お礼
回答ありがとうございます。 助かりました。