新規無料会員登録で1000名様に電子コミック1000円分が当たる!!

Range("a90")=-3000
Range("a91")= 2000
Range("a92")=-8500
Range("a93")=23000
Range("a94")= 3000
Range("a95")=-2100
実際にはもっと長く続きますが
0よりも大きければ勝、0よりも小さければ負けとしてRange("A20")に勝率を出したいのですがよろしくお願いします。

A 回答 (2件)

VBAででしょうか?


Sub MACRO()
Dim RG As Range
Dim CT,WN As Long
Range("a90")=-3000
Range("a91")= 2000
Range("a92")=-8500
Range("a93")=23000
Range("a94")= 3000
Range("a95")=-2100
For Each RG In Range("A90:A95")
If RG > 0 Then WN = WN + 1
If RG <> 0 Then CT = CT + 1
Next RG
Range("A20") = WN / CT
End Sub
    • good
    • 0
この回答へのお礼

知らなかったコマンドが使えるようになります。このまま使わせてもらいます。
VBAの勉強になりますありがとうございました。

お礼日時:2008/04/27 11:18

通常のセルのA列の90行以下に数字が入っている場合、2000行ぐらいまで数字が入っているとして(その中に空白行があってもかまいませんが)、


A20セルに以下の数式を入力すれば

=countif(A90:A2000,">0")/count(A90:A2000)

勝率(正数の割合)が出せます。%表示したければ、セルの書式設定でパーセントを選んでください。
    • good
    • 0
この回答へのお礼

できましたありがとうがざいました。

お礼日時:2008/04/27 11:14

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

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qエクセルかグーグルスプレッドで勝率計算

画像のように勝ちと負けの数字をいれていき 右のあいているところが自動で 勝率%で表示されるようにするにはどのようにしたらよろしいでしょうか

Aベストアンサー

勝率を表示する列に次のような数式を入力します。
A列に氏名、B列に勝ち数、C列に負け数としたときD2へ次の式を入力し、下へコピーする。
=B2/(B2+C2)
計算結果が小数になりますがExcelの場合は数値の表示形式を%に指定すると33%のようになります。
1%未満の表示桁数は任意に変更できます。
空欄の行がエラーになるのを防ぐにはIF関数で対処できます。
=IF(COUNT(B2:C2),B2/(B2+C2),"")

Q勝率をはじき出したい

D2 ○ 勝ち
D3 × 負け
D4 × 負け
D5 - 引き分け


引き分けを除外すると、1勝2敗が成績です。

D6に勝率 %を出すにはどんな数式が必要ですか?

Aベストアンサー

こんにちは!
普通、勝率に引き分けは含みませんので、

=COUNTIF(D2:D5,"○")/COUNTIF(D2:D5,"<>-")

ではどうでしょうか?

※ 「-」を数式では「全ハイフン」としています。m(_ _)m

Q勝率(%)の出し方

質問させて頂きます。
16勝69敗で勝率が18.82%
では15勝54敗の時の確立は何%なんでしょうか?
できればどうやってその確立を出したのかも教えて欲しいです。
よろしくお願いします

Aベストアンサー

勝率=勝った回数÷全体の回数(勝った回数+負けた回数+(引き分けの回数))
パーセンテージであれば、これに100を掛ける。

16勝69敗の場合
勝った回数:16回
全体の回数:16+69=85回
∴ 16÷85×100=18.8235…≒18.82%

15勝54敗の場合
勝った回数:15回
全体の回数:15+54=69回
∴ 15÷69×100=21.7391…≒21.74%

Qエクセルで勝敗の合計を出したい

エクセルで1日の勝敗分を記録しています
1ヶ月の勝敗分の合計を出すには
どういった関数にすればいいのでしょうか?

ちなみに勝敗分が入ってるセルは
分類は標準
具体的には 4勝2敗1分 と入力しています

よろしくお願いいたします

Aベストアンサー

>ただ、SUM関数で合計を求めると0になってしまいます
失礼しました。
C列に =LEFT(B2,FIND("勝",B2)-1)
ここままでは、まだ文字列のままでした。
C列に =LEFT(B2,FIND("勝",B2)-1)*1
と意味のない四則計算を加えてみてください。数値の取り扱いになります。
もし、B列を既に削除されているのであれば、空いている セルに 1 と数値をいれて、コピィ
C~E列を選択、形式を選択して貼り付け=>乗算にチェック OK すれば、現在文字になっている値が数値になります。
月単位でまとめるのであれば、
後は、別シートに
 年月  勝 敗 分
2009/6/1
2009/7/1
・・と作成して、
A列の表示形式を yyyy年mm月 にすれば
 年月  勝 敗 分
2009年6月
2009年7月
と表示されます。
勝の合計でいえば
=SUMIF(元データのシート!A:A,"<"A3,元データのシート!C:C)-SUMIF(元データのシート!A:A,"<"A2,元データのシート!C:C)
としてみてください。
式の意味は、元データの日付の部分が2009/7/1未満の勝ちの合計から
元データの日付の部分が2009/6/1未満の勝ちの合計を引き算するということです。
これで、2009年6月の勝ちの合計が出ます。
同様で、合計の範囲を変えれば敗でも分でも計算が可能です。
式が出来たら下へコピィすれば、毎月の集計が出ます。

>ただ、SUM関数で合計を求めると0になってしまいます
失礼しました。
C列に =LEFT(B2,FIND("勝",B2)-1)
ここままでは、まだ文字列のままでした。
C列に =LEFT(B2,FIND("勝",B2)-1)*1
と意味のない四則計算を加えてみてください。数値の取り扱いになります。
もし、B列を既に削除されているのであれば、空いている セルに 1 と数値をいれて、コピィ
C~E列を選択、形式を選択して貼り付け=>乗算にチェック OK すれば、現在文字になっている値が数値になります。
月単位でまとめるのであれば、
後...続きを読む

Q勝率の計算方法

プロ野球のペナントレースの勝率の計算の仕方を教えてください。

「5試合 / 2勝2敗1分け」の場合は「勝率:500」となっています。

計算方法は、これしか思いつきませんでした…
        ↓
 勝数 ÷ (試合数 - 引き分け数) = 勝率

これで合っているのでしょうか?

間違っていましたら「訂正」をお願い致します。。。

質問番号:6673724

Aベストアンサー

結果的に計算方法は同じになると思いますが、野球の規則書には
勝率=勝数÷(勝数+負け数)とあります。
(参照)
公認野球規則2011版
10.21(a)「勝率を出すには、勝、敗の合計数で勝試合数を割る。」

QExcelでの割合の求め方

例えば、セルA1~A10までにランダムな数字が記入されているとします。A1~A10の合計を100%とし、それぞれの%をセルB1~B10に入れたいのですが、まったくやり方がわかりません。関数で簡単に出来る方法は無いのでしょうか?

Aベストアンサー

補足です。
=A1/sum($A$1:$A$10)

にすべきでした。
手元にエクセルが無いので、失礼いたしました。

Qエクセルの件

エクセルの初心者です。
パソコン教室の宿題で「勝率を計算する。」 計算式:勝率=勝数÷(勝数+負け数)をエクセルの表で表しなさいと出されました。野球チームで勝数10、負け数12、引き分け2として勝率=10÷(10+12)で計算すればいいのだと思いますが、エクセルの方法でどうやって操作するかわかりません。
どなたか教えて下さい。

Aベストアンサー

EXCELで計算しなさいということは、EXCELのセルに計算式を入れなさいという意味なのだと思います。

なので、これは一例ですが

A1のセルに勝ち数を入れて、b1のセルに負け数をいれて、c1のセルに引き分けを入れたとします。

そしてd1のセルに勝率を計算させるための式を入れることになります。

勝率を計算する式は =a1/(a1+b1) となります。

これが基本中の基本です。

表示を〇割〇分〇厘としたい場合は、少し複雑ですが計算式は

=TEXT((a1/(a1+a1))*1000,"0割0分0厘")

となります。

Qパーセンテージの出し方

パーセンテージの出し方をおしえてください

Aベストアンサー

主人公÷母体×100

Qエクセルで、列内が同じ名前を集計する方法は?

エクセルで以下のような表を作成したとします。

      A列   B    C    D
 1行   名前   項目   金額
 2    すずき  あいう  100
 3    すずき  かきく  200
 4    すずき  さしす  450
 5    さとう  あいう  150
 6    さとう  さしす  200
 7    はやし  あいう  250 
 8    はやし  かきく  170
 9    はやし  たちつ  980

B列の名前が同じ者の、金額の合計をD列に出したいのです。
D4に すずきの合計 750、D6にさとうの合計 350、
D9にはやしの合計 1150  というふうに。
全部で100人分位、データ行数は15000ほどあるのですが
これをさっとできるようにはどのようにしたら良いのでしょうか?

Aベストアンサー

次の方法は如何でしょうか。
D2に=IF(COUNTIF(A:A,A2)=COUNTIF($A$2:A2,A2),SUMIF(A:A,A2,C:C),"")を入力→D2を選択→フィルハンドル(D2セル枠右下の■)をダブルクリック
但し、C列途中に空白がある場合、その直前までしかコピーされませんので、空白セル前のセルを下方向にコピー後、同様にフィルハンドルをダブルクリックし下さい。

Qエクセルなどで、ボタンを押すとじゃんけんの「グー」「チョキ」「パー」が

エクセルなどで、ボタンを押すとじゃんけんの「グー」「チョキ」「パー」が表示されるプログラムを作りたいのですが可能でしょうか。
できればグーなど手の形はイラストを使いたいです。当方パソコン初心者です。

Aベストアンサー

どこかのセルに以下の式を入力し、セルの書式設定のフォントタブでフォント名を「Windings」にしてサイズを「36」程度にしてください。

=CHOOSE(INT(RAND()*3)+1,"C","A","I")

F9キーを押せば、グー・チョキ・パーがランダムに表示されます。


人気Q&Aランキング