Question

怎样利用excel里的函数分析一组数据的变化

Answer 1

方法一：

假设数据区域为A1:E80,在该区域外任一位置输入

直接输入公式：

=OFFSET($A$1,RAND()*80,RAND()*5)

注:$A$1是你左上角单元格的位置（如果不是该位置要做相应改变）.

方法二：

VBA：（假设数据区域为A1:E80,F1：F20放抽出数据）

Sub ZXB()

Dim I As Long

Randomize

For I = 1 To 20

Cells(I, 6) = Cells(Int(Rnd() * 79) + 1, Int(Rnd() * 4) + 1)

Next I

End Su