Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


64588 / 76732 ←次へ | 前へ→

【16724】Re:時間計算について教えて下さい
発言  ichinose  - 04/8/7(土) 7:53 -

引用なし
パスワード
   ▼ackkn さん:
おはようございます。

>どなたかご教示下さい、よろしくお願いします。
>時間計算で困っています、作業実績データの中に、昼休み時間が含まれたデータは昼休み時間(1H)を差し引くという物です。
>
>担当者コード 担当者名 開始時刻 終了時刻 昼休 所要時間 所要分
> 25638  山田花子  11:03   13:19  0:00  2:16  136
>
>上記のような作業実績データが複数行あります、上記の開始時刻、終了時刻には、
>実データとして 日付、時間が "2004/8/5 11:03:38" このような形で入っています。(これらの実績データはバーコードハンディーターミナルにて収集されている関係上)
>で、上記の昼休の算出をしたいのですが、昼休みは 11:30〜12:30です、よって、
>上記データは昼休み時間を含んでいる事になりますので、昼休のセルに"1:00"をセットしたいのです。
>昼休のセルに"1:00"がセットできれば、その分を所要時間から引けばOKです。
>関数でもいけそうな気がするのですが、なかなか上手くいきません。
>どうかよろしくお願い致します。

作業開始時刻------a
作業終了時刻------b
昼休み開始時刻----c
昼休み終了時刻----d

この四つの時刻の並び方で想定されるのは

a-b-c-d  午前中(昼休み前)に作業終了
a-c-b-d  昼休みの途中で作業終了
a-c-d-b  オーソドックスなパターン
c-a-b-d  昼休み中だけ作業(実質ありえない)
c-d-a-b  午後(昼休み終了後)から作業開始

基本の計算は、

MIN(B,D)-MAX(A,C)

で可能ですよね(但し、昼休み時間として、0:30という解も出てきます、いや、でてこないと単純には作業時間-昼休み時間という計算で実作業時間はえられませんよね?)

後は、上記の計算をするかしないかの場合分けです。


「=IF(AND(MIN(B,D)=D,MAX(A,C)=A),
    TIMEVALUE("1:00"),
   IF(MIN(B,D)-MAX(A,C)<=0,
       0,
      MIN(B,D)-MAX(A,C)))」

AND(MIN(B,D)=D,MAX(A,C)=A)で、ありえないパターンを見つけています。
この時は、昼休み時間 1:00
後半は、「MIN(B,D)-MAX(A,C)」の値が正か負かで分岐しました。

実際にはa,b,c,dをセルアドレスに変えて試してみて下さい。
(昼休み開始、時間もどこかのセルに入れておいたほうがよいですよ!!
 めったに変わらないだろうけど、可能性は0ではないから)

時間が交差したときの細かい計算方法が不明なので独断で行いました。
0 hits

【16722】時間計算について教えて下さい ackkn 04/8/7(土) 0:39 質問
【16724】Re:時間計算について教えて下さい ichinose 04/8/7(土) 7:53 発言
【16725】Re:時間計算について教えて下さい ackkn 04/8/7(土) 11:04 回答
【16735】Re:時間計算について教えて下さい ichinose 04/8/7(土) 18:14 発言
【16741】Re:時間計算について教えて下さい 訂正 ichinose 04/8/7(土) 20:38 発言
【16744】Re:時間計算について教えて下さい 訂正 ackkn 04/8/7(土) 22:26 質問
【16746】Re:時間計算について教えて下さい 訂正 ichinose 04/8/7(土) 23:15 発言
【16756】Re:時間計算について教えて下さい 訂正 ackkn 04/8/8(日) 21:46 お礼

64588 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free