電子書籍の厳選無料作品が豊富!

平均は、一ヶ月の合計時間数から1対応あたりの時間平均値

割合は合計時間数から見て8分以内、5分以内、3分以内、2分以内の割合が
どれだけであったかを出したいです。

※単位は秒単位バージョン、時分秒単位バージョン出したいです。

何か良い方法をご教授頂けると幸甚で御座います。

A 回答 (2件)

例えば時間のデータがA1セルからA100セルの間に入力されているとします。

時間の入力は1分でしたら0:01:00のように入力されているとします。
そこで平均の時間ですがB1セルには平均時間などと記して、B2セルには次の式を入力します。

=AVERAGE(A1:A100)

セルの表示形式はh:mm:ssのようにします。
合計時間数からみた2分以内、3分以内、5分以内、8分以内の割合ですが、C1セルには時間以内とか記して、C2セルには0:02:00、C3セルには0:03:00、C4セルには0:05:00、C5セルには0:08:00と入力します。
その後にD1セルには時間以内割合とでも記して、D2セルには2分以内の割合として次の式を入力します。

=SUMIF(A1:A100,"<="&C2,A1:A100)/SUM(A1:A100)

D3セルには次の式を入力してD5セルまでオートフィルドラッグします。

=(SUMIF(A$1:A$100,">"&C2,A$1:A$100)-SUMIF(A$1:A$100,">"&C3,A$1:A$100))/SUM(A$1:A$100)

最後にD2セルからD5セルを選択してセルの表示形式をパーセンテージにし、小数点以下の桁数を2などとすればよいでしょう。
    • good
    • 0
この回答へのお礼

上記方法で何とか希望の数値が出せそうです。

本当に有難う御座いました。

そして、返答が遅くなってしまいごめんなさい。

お礼日時:2010/12/09 13:47

下記のマクロを実行するとデータを下の図のように分けてくれます。

ただしもとのdataは1列目にいれてあり、データ数は仮に8としてありますがこれは適宜修正してください。各階級を3列目から7列目までにわけて表示するようにしています。平均やテータ数はこの結果からエクセルの固有の関数を使って自分で計算してください。このマクロをコピーして使ってください。



>=88>X >=55> X >=33>X>=2<2
1010
66
88
11
55
33
55

Sub Macro1()
'
' Macro1 Macro
' マクロ記録日 : 2010/12/8 ユーザー名 :
'
Dim mygyo As Integer, myvalue As Variant

For mygyo = 2 To 8
myvalue = Cells(mygyo, 1)
If myvalue >= 8 Then
Cells(mygyo, 3) = myvalue
ElseIf myvalue >= 5 Then
Cells(mygyo, 4) = myvalue
ElseIf myvalue >= 3 Then
Cells(mygyo, 5) = myvalue
ElseIf myvalue >= 2 Then
Cells(mygyo, 6) = myvalue
Else: Cells(mygyo, 7) = myvalue
End If
Next
    • good
    • 1
この回答へのお礼

早急なご回答いただいたにも関わらずご返答が遅くなってしまい
申し訳ありません。

上記ご教示頂いた、VBAを試してみましたが、私には少々難解でありました。
教えていただいたにも関わらず申し訳ないです。

VBAを勉強していきます。

有難う御座いました。

お礼日時:2010/12/09 13:46

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!