excel要分别从1-120里面，随机取1-25、26-50、51-75、76-100、101-120，5组数，每组数10个左右，求公式

=ROUND(1+RAND()*24,1) 1-25
=ROUND(26+RAND()*24,1) 25-50
=ROUND(51+RAND()*24,1) 51-75
=ROUND(76+RAND()*24,1) 76-100
=ROUND(101+RAND()*19,1) 101-120
最后一个1代表的是几位小数。你如果是整数就改成0

1-25: =INT(RAND()*25)

=(ROUNDDOWN((ROW(A2)-1)/10,)*25)+INT(RAND()*25+1)
下拉公式

EXCEL表格中：假如A1是1—25 A2是26—50 A3是51—75 A4是76—100 下面单元格中区间数据递增如何设置~

A1单元格输入 =row(a1)*25-24 & "-" & row(a1)*25
公式下拉填充

'试一下：
Option Explicit
Dim arr(1 To 100), c As Long
Sub test()
Dim brr(1 To 100), i, j
c = 0
fc 80, 1, 50 '范围及个数
fc 20, 51, 100 '范围及个数
For i = 1 To 100 '随机生成1-100数且不重复
Randomize
brr(i) = Int(Rnd * 100) + 1
If i > 1 Then
For j = 1 To i - 1
If brr(i) = brr(j) Then
i = i - 1
Exit For
End If
Next
End If
Next
For i = 1 To 100 '乱序
brr(i) = arr(brr(i))
Next
[a1].Resize(UBound(arr), 1) = WorksheetFunction.Transpose(brr)
End Sub
Function fc(n, lowerbound, upperbound)
Dim i
For i = 1 To n
c = c + 1
Randomize
arr(c) = Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Next
End Function

个人工作总结
答：本人担任高一(5)班班主任已有三个多月,在这三个月里,我全身心投入到工作中,总结起来,有得有失。开学初,我作了一个题为《抓好德育,狠抓学习》的班主任工作计划,下面我分别从我班的德育和学习两方面总结一下我的工作。 时间总是在不禁意间从身边悄悄流过,还记得第一次踏进一(2)班的教室,面对一张张天真无邪...