エクセルの計算（時間）

質問

エクセルで時間の計算をしたいのですが教えてください。

計算的には

550,000　÷　7500　で　これを時間にしたいのですが

普通に計算すると　73.33333333・・・　になるのですが

これを　７３時間　○○　分にしたいのです。
どうしたらいいのですか？

回答No.2

fenglu · ベストアンサー

エクセル初心者です（というか、OpenOfficeしか持ってない上に系統立てて学んだ事がありません）。

仮にA1が550000で、A2が7500として、
まず時間の部分は普通にA1/A2の整数部分を使えばいいのでINT(A1/A2)
分の部分はA1/A2の余り（今回であれば2500）を60倍（時間から分に変換するため）したものをA2で割ればいいのでMOD(A1;A2)*60/A2
という事で、=INT(A1/A2)&"時間"&MOD(A1;A2)*60/A2&"分"ではどうでしょうか。
OpenOffice Calcでは73時間20分と表示されました。

ちなみに、先に小数が出る計算を行い、その小数部分を60倍するような手順も試したのですが、20分ではなく19.999…分になってしまいました。

回答No.3

cradoll

550,000がA1のセル
7,500がB1のセルにあるとすると

計算したいセルに以下の式を入力
=A1/A2*0.041666667

入力したセルの書式設定で
「表示形式」の「分類」から「ユーザー定義」を選択して
「種類」の下にある入力欄に
[h]"時間"mm"分";@
と入力してみてください

回答No.1

nda23

手順を考えます。
(1)結果を整数部と小数部に分ける。
(2)小数部に60を掛ける。
(3)整数部と小数部を表示する
Function 表示 (ByVal 結果 As Double) As String
Dim 整数 As Long
Dim 小数 As Long

整数 = Int(結果)
小数 = CLng((結果 - 整数) * 60)
表示 = Format(整数, "0") & "時間" _
　　　& Format(小数, "0") & "分"
End Function