A 回答 (4件)
- 最新から表示
- 回答順に表示
No.4
- 回答日時:
これで、比較したみてください。
Dim AVE
AVE = WorksheetFunction.Average([A1].CurrentRegion)
Range("A10") = "AVE"
Range("B10") = AVE
Range("A11") = "INT(AVE)"
Range("B11") = Int(AVE)
Range("A12") = "ROUND(AVE)"
Range("B12") = Round(AVE, 2)
No.3
- 回答日時:
こんな感じでしょうか?
Sub try()
Dim i As Integer, j As Integer
Dim tensu As Integer, goukei As Integer
Dim heikin As Double
Randomize ' 習ってないようなら消してください。
goukei = 0
For i = 1 To 6
For j = 1 To 10
tensu = Int(Rnd() * 101)
Cells(i, j).Value = tensu
goukei = goukei + tensu
Next j
Next i
heikin = goukei / 60#
MsgBox ("平均点 = " & heikin)
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- C言語・C++・C# このプログラミング誰か教えてくれませんか 1 2022/06/02 15:27
- C言語・C++・C# このプログラミングの問題を教えてほしいです。 キーボードからデータ数nとn個のデータを入力し、平均値 3 2022/12/19 22:51
- C言語・C++・C# C言語 3 2022/10/04 15:07
- C言語・C++・C# C言語 プログラミング 4 2022/05/22 11:53
- Visual Basic(VBA) Powerpointでランダムな数字の結果を表示するマクロ 2 2023/08/04 10:04
- Excel(エクセル) エクセル・スプレッドシートで、一定数を超えたらゼロから再累計する方法 8 2022/05/28 03:52
- その他(Microsoft Office) ピボットテーブルへの集計フィールド挿入 1 2023/02/26 11:33
- Ruby VBA 2 2023/01/14 14:14
- Excel(エクセル) エクセルのSUM関数について 4 2023/04/18 10:37
- C言語・C++・C# プログラミングを教えて欲しいです。 配列aは、int a[9]={7,6,12,8,3,5,10,9 4 2022/12/19 23:27
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
65536は2の何乗なのでしょうか?
-
万年暦を導き出すプログラミング
-
パソコン
-
VBAで関数をつくる
-
C言語についてです。 再帰を使...
-
内税の計算式
-
排他的論理和 BCC(水平パリテ...
-
ユーザー定義関数の作成
-
VBAでベッセル関数を使う方法
-
バッチファイルでウインドウを...
-
チェックデジット計算できる関...
-
数十万番目の素数を表示させる...
-
C言語 log実装
-
VBAの再計算が反映されない件に...
-
Javaでのある数の小数点乗に...
-
タクシー料金の問題です
-
人時生産性をExcelで計算したい
-
エクセルで特定のセルのみを任...
-
順列のプログラムについて(VB)
-
Perlで時間の計算
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
65536は2の何乗なのでしょうか?
-
変化させるセルが変化しない
-
排他的論理和 BCC(水平パリテ...
-
VBAの再計算が反映されない件に...
-
VBAで関数をつくる
-
バッチファイルでウインドウを...
-
モジュラス103の計算とは何でし...
-
EXCELなどで「返す」という表現
-
数値計算の高速化 (cos, sin, exp)
-
傾いた四角形内の範囲の条件式
-
骨折リスク評価のFRAXについて...
-
matlab計算での進捗状況を知りたい
-
Excel VBAにてFFT
-
C言語についてです。 再帰を使...
-
C言語について 下の画像は do-w...
-
アドオン利率を実質年率に変換
-
エクセルで特定のセルのみを任...
-
電卓でmodの計算
-
引き放し法による除算アルゴリ...
-
y=(x^2 +3x+1)^4を微分の定義を...
おすすめ情報
めぐみんさん返信ありがとうございます。範囲は0点から100点なので最低点数は0となります(>人<;)