
No.1ベストアンサー
- 回答日時:
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
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するQ&A
- 1 エクセルで、=IF(A12="a",TRUE)は =A1="a" ???
- 2 Excelで生産性の計算をしたいです。 A1に総個数、A2に総投入時間、A3に計算式で=SUM(A1
- 3 Excel でシート間の重複データ(Sheet1のA=Sheet2のA かつ Sheet1のB=Sheet2のB)
- 4 Excelでの表編集でC1に =IF(A1="",B1,A1)
- 5 =IF(A2="",A1,A2)
- 6 Excel2000で,セルの式「=a1+a6+a11+a16+...(5行ごとの和)」を簡単に記述する式はないですか?
- 7 【緊急!至急!】 Excelの計算でセルに「=」を入力して無くても計算してくれる設定の方法。
- 8 =IF(A2="",A1,A2)
- 9 空白のセルに=A1とやってもA1に表示されている内容は表示されずに=A1と表示されてしまう何で?
- 10 Excelで"A=A+1"のような式を書きたい
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
人気Q&Aランキング
-
4
ワードの表の中に文字を入れる...
-
5
日付を入力しカレンダーの該当...
-
6
横書きで縦の波線の書き方
-
7
エクセルで特定のセルを表示の...
-
8
Excelで、セル内改行もそっくり...
-
9
エクセルのセルが縦方向にのびる
-
10
Excelで年月日データから下二桁...
-
11
エクセル2010 日付入力(カレ...
-
12
EXCELでCELL一杯の文字を書きた...
-
13
エクセルで住所のフリガナ変換
-
14
エクセルで作成した表内で、文...
-
15
【Excel】セルの中の文字の下の...
-
16
エクセルで、文章の右端をそろ...
-
17
エクセルで文字の上に重ねがき...
-
18
Excel2007での英語の月名を数字...
-
19
Vlookupそこにあるのに#N/Aが出る
-
20
Excelで2進数の表示
おすすめ情報