Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12462 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【10380】経過時間の算出 陽 04/1/22(木) 10:32 質問
【10382】Re:経過時間の算出 ちん 04/1/22(木) 14:30 回答
【10390】Re:経過時間の算出 陽 04/1/23(金) 13:17 お礼
【10380】経過時間の算出
質問  陽  - 04/1/22(木) 10:32 -
引用なし
パスワード
   はじめまして、陽です。

勤務時間の合計時間を算出したいので

　　DateDiff("n", 開始時刻, 終了時刻)

としてみたのですが、開始時刻 = 9:00、終了時刻 = 33:00
のような、丸一日ぶっとおしの勤務の場合、うまく計算されません。

また、終了時刻 = 33:00 以降の場合は、翌日の勤務になるので
Msgを出したいのですが、開始時刻 = 9:00、終了時刻 = 34:00
にすると、DateDiff関数で正の値が戻ってくるので
Msgが表示されません。

すいませんが、どなたか宜しくお願いいたします。
【10382】Re:経過時間の算出
回答  ちん  - 04/1/22(木) 14:30 -
引用なし
パスワード
   ▼陽 さん：
>はじめまして、陽です。
>
>勤務時間の合計時間を算出したいので
>
>　　DateDiff("n", 開始時刻, 終了時刻)
>
>としてみたのですが、開始時刻 = 9:00、終了時刻 = 33:00
>のような、丸一日ぶっとおしの勤務の場合、うまく計算されません。
>
>また、終了時刻 = 33:00 以降の場合は、翌日の勤務になるので
>Msgを出したいのですが、開始時刻 = 9:00、終了時刻 = 34:00
>にすると、DateDiff関数で正の値が戻ってくるので
>Msgが表示されません。
>
>すいませんが、どなたか宜しくお願いいたします。

こんにちは、ちんといいます。
時間だけの計算するときは、日をまたぐ事がるので、
日付けと時刻の変数で、時間を求めてはどうでしょう。

DateDiff("n", "yyyy/mm/dd hh:mm", "yyyy/mm/dd hh:mm")
　　　　　　　　 開始日 開始時刻　　終了日 終了時刻

以上、
【10390】Re:経過時間の算出
お礼  陽  - 04/1/23(金) 13:17 -
引用なし
パスワード
   すいません。お礼が遅くなりました。
DateDiff関数に日付を持たせて解決ができました。
ありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12462 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free