
現在Excelのマクロにて勤怠の時間計算を行っています。
終わった時間から開始時間を引いて何時間働いたかを出したいです。
ただ夜勤の場合日付が変わって就業時刻が終わる為
24時を超えた計算を行いたいです。
例
FM9時開始AM6時終わりの場合
30時-21時を引いた9時間という感じの計算を行いたいです。
行ってみた事。
TimeValue("30:00")-TimeValue("21:00")という計算を行ったところエラーとなってしまいました。(型が一致しませんとでました)
TimeValueだと24:00以上の値は使えないのでしょうか?
また、どの関数なら24時以降の計算が行えるのでしょうか?
初歩的な質問で申し訳ございませんが宜しくお願いします。
No.2ベストアンサー
- 回答日時:
Double型として時間を取得してみてはいかがでしょう
dim d1 as double, d2 as double, d3 as double
dim t1 as date
' 6:00として入力
d1 = TimeValue("6:00")
d2 = TimeValue("21:00")
d3 = d1 - d2
if d3 < 0 then
' マイナスの場合は 1日分加算する
d3 = d3 + 1.0
end if
' シリアル値を日付型に代入して時間を取得
t1 = d3
debug.print t1
といった具合です ...
なるほど!!!
これなら日勤の場合も夜勤の場合も1つの計算式でいけます!
日付が変わった場合だけの式を考えておりました。
一つの式で両方をまかなえる式を書き込んで頂ありがとうございます♪
No.1
- 回答日時:
こんにちは
Timevalue 関数は、時間ではなくて時刻をシリアル値(一日は、0 から0.99999999の範囲)に変換する関数です。
24:00以上の値は使えません。また24:00は、シリアル値で 0 (=0:00)になってしまいます。
シリアル値の性質を考えると単純に日付を含めて引き算すると時間が求められます(2009/3/10 9:30 のセルB1から 2009/3/9 8:15のセルA1を引く例 =B1-A1)。
24:00以上のシリアル値を表示するときは、表示形式を [h]:mm にします。
書き込みありがとうございます。
Timevalue関数は24:00以降は使用できなかったんですね。
>24:00以上のシリアル値を表示するときは、表示形式を [h]:mm にします。
これはセルの表示形式を変更するという事でしょうか?
セルの表示形式ではなくマクロ内で24:00以降の値を使用する場合はどうしたらいいのでしょうか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセル マクロ 指定日の指定時刻にプロシージャを実行 4 2022/04/17 16:44
- Excel(エクセル) 指定した値以上の中で最小値を出したい 7 2022/10/24 21:12
- その他(ビジネス・キャリア) 日報の実務労働時間の集計について困っています。 2 2023/06/09 19:00
- その他(Microsoft Office) Excel 勤務時間の計算について~(残業)有.無しの場合。 4 2022/07/17 21:03
- その他(Microsoft Office) 勤務表のエクセル作成で数式を教えてください。 1 2023/01/17 03:27
- 労働相談 有給休暇使用時の賃金の計算方法について 5 2022/04/04 00:02
- Excel(エクセル) 勤務表ですが、思うように出来ません。 3 2023/05/19 06:43
- Excel(エクセル) Excel関数で日またぎの勤務時間にしるしを立てる 2 2022/04/20 17:22
- Excel(エクセル) 月間シフト表から総勤務時間を計算する関数 4 2023/05/20 07:12
- Excel(エクセル) エクセルの早退時間を計算したいです。計算はうまくいっているようですが… 1 2022/12/26 16:22
このQ&Aを見た人はこんなQ&Aも見ています
-
いちばん失敗した人決定戦
あなたの「告白」での大失敗を教えてください。
-
【お題】動物のキャッチフレーズ
【お題】「百獣の王 ライオン」「実は動物界最強 カバ」は分かるけど、それはちょっとピンと来ないなと思った動物のキャッチフレーズ
-
歩いた自慢大会
「めちゃくちゃ歩いたエピソード」を教えてください。
-
スタッフと宿泊客が全員斜め上を行くホテルのレビュー
スタッフも宿泊客も、一流を通り越して全員斜め上なホテルのレビューにありがちな内容を教えて下さい
-
準・究極の選択
「年収1000万円で一生カレーライス」か「年収180万円で毎日何でも食べ放題」
-
vba 時間の引き算 例えば 15:00から16:15の間の時間は1時間15分ですが、vbaのコード
Visual Basic(VBA)
-
IF文に時間(何時から何時まで)の条件文を付けたい
Word(ワード)
-
vbaの時間計算について
Excel(エクセル)
-
-
4
VBAで時間の型と計算方法教えてください
Excel(エクセル)
-
5
vba セルに入力した時間をマクロで受け取るには?
Excel(エクセル)
-
6
エクセルVBAの時間計算
Excel(エクセル)
-
7
VB2013での時間帯判定で困っています
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・昔のあなたへのアドバイス
- ・字面がカッコいい英単語
- ・許せない心理テスト
- ・歩いた自慢大会
- ・「I love you」 をかっこよく翻訳してみてください
- ・ゆるやかでぃべーと タイムマシンを破壊すべきか。
- ・はじめての旅行はどこに行きましたか?
- ・準・究極の選択
- ・この人頭いいなと思ったエピソード
- ・「それ、メッセージ花火でわざわざ伝えること?」
- ・ゆるやかでぃべーと すべての高校生はアルバイトをするべきだ。
- ・【お題】甲子園での思い出の残し方
- ・【お題】動物のキャッチフレーズ
- ・人生で一番思い出に残ってる靴
- ・これ何て呼びますか Part2
- ・スタッフと宿泊客が全員斜め上を行くホテルのレビュー
- ・あなたが好きな本屋さんを教えてください
- ・かっこよく答えてください!!
- ・一回も披露したことのない豆知識
- ・ショボ短歌会
- ・いちばん失敗した人決定戦
- ・性格悪い人が優勝
- ・最速怪談選手権
- ・限定しりとり
- ・性格いい人が優勝
- ・これ何て呼びますか
- ・チョコミントアイス
- ・単二電池
- ・初めて自分の家と他人の家が違う、と意識した時
- ・「これはヤバかったな」という遅刻エピソード
- ・ゴリラ向け動画サイト「ウホウホ動画」にありがちなこと
- ・泣きながら食べたご飯の思い出
- ・一番好きなみそ汁の具材は?
- ・人生で一番お金がなかったとき
- ・カラオケの鉄板ソング
- ・自分用のお土産
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
O(n log n)について2
-
2進数の足し算(C言語)
-
VB.net Double と...
-
2038年問題 日付算出
-
16進数 加算 減算 C言語
-
三菱シーケンサ(Aシリーズ)で...
-
EXCELの関数"STDEV(標準偏差)"...
-
ExcelでPC(パソコン)によって...
-
有効数字について 以前質問をし...
-
【C言語】RGBと輝度の計算に関して
-
VBAでの割り算の余りの求め方
-
VB6.0での小数点の扱いについて
-
c languageで 簡単な質問があ...
-
時刻の比較
-
VBAでミリ秒まで出力する方法
-
教えて小数点の比較!(C言語)
-
定数の定義方法 #define
-
floatの有効桁数
-
16進数とかわからないです
-
Visual Studioのバージョンによ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ExcelでPC(パソコン)によって...
-
有効数字について 以前質問をし...
-
O(n log n)について2
-
VB.net Double と...
-
ExcelのINT関数の計算結果がお...
-
c languageで 簡単な質問があ...
-
VBAでミリ秒まで出力する方法
-
EXCELの関数"STDEV(標準偏差)"...
-
16進数 加算 減算 C言語
-
三菱シーケンサ(Aシリーズ)で...
-
VB6.0での小数点の扱いについて
-
除算を使わずに10で割りたい。
-
”/”を使わずに割り算したいんで...
-
計算の丸め誤差の解消について
-
CRCの計算方法について
-
2038年問題 日付算出
-
VB6のFIX関数での誤差について
-
色の判定
-
大きすぎる数値になるとE+にな...
-
浮動小数演算は実行環境の変化...
おすすめ情報