51问答网 > 在excel中有57个学生，按学号排序，如何实现给他们随机安排考试座位号

在excel中有57个学生，按学号排序，如何实现给他们随机安排考试座位号

rand函数我试过，取整数会出现相同的整数

2025-03-27 13:52:52

推荐回答（5个）

回答1：

假如A列是学号1，2,3，……，57。B列是姓名，在C1中输入=rand(),向下拖拽填充柄至57，在C列产生随机数
0.564053156
0.226465042
0.074101238
0.79266365
0.04904085
0.268217066
再按C列排序，A列就是你要的随机安排考试座位号了。

回答2：

1.假设A列是学号，B列是姓名，插入C列“座位号”、D列随机数。在D列插入=rand()（共57个，不要取整，如同你说的那样，取整数会出现相同的整数）
2.选中D列，复制---选择性粘贴---数值（因为随机数时时在变，这样就将它改成数值了）
3.以D列排序，再在C列排出座位号

回答3：

1/在学号前插入两列,A列标题考证号,B列标题随机号,
2/在B2中输入公式=int(rand()*57),然后向下拉到第58行.
3/对B列进行排序
4/然后在A1输入1,按住ctrl向下拉到57,即可得到对应学员的考试号.

回答4：

在学号前新建一列，然后在这一列中用rand()函数产生57个随机数，然后对这57个随机数按大小排序，就可以实现学号的随机排列了。

说明：因为随机数的大小是随机的，因此对随机数进行排序时，学号就会进行随机的重新排列。

回答5：

这个问题我来解决，试了多次直接用函数，还是好像不行，只好借助VBA

在工作表中按Alt+F11，打开VBA编程界面，在工具栏第二个图标拉下来，选模块

在左边栏双击“模块1”并在右边打开的程序书写区粘贴如下代码

Sub GetRnd()
Dim rn As Range
Dim rnn As Integer
Dim cRn As Range
Set rn = Selection
rn.ClearContents
rnn = rn.Cells.Count
For Each cRn In rn
Do
cRn = 1+Int(rnd() * rnn)
Loop Until Application.WorksheetFunction.CountIf(rn, cRn) = 1
Next
End Sub

现在回到工作表，假如你的学号在A1:A57，那么你就选中B1:B57或C1:C57（或D1:D57)，反正只要是空的就行，然后按Alt+F8，在打开的对话窗口中选GetRnd并单击“执行”按钮，你就会在你选中的区域内看到一个随机的数序列。这就是学生的座位号。

这个程序有一点是比较通用的，不一定要拿来排座位，你如果选中12个单元格（无论是一列还是多列，也无论是一行还是多行），用Alt+F8运行它，它就自动会在这些格内产生1－12的不重复的随机数。
换句话说，就是选N格，就会在这N格内产生1－N的不重复的随机数。你还可以把它用到多种方面。即使下次你的班级是45个人了，你一样可以用它来随机排考座。

最新问答

什么是eva防水板它的用途又在哪里呢

鸣人的女儿资料

老抚顺火车站是谁建设的,是日本人还是毛子?

小米4获取root后!卸载掉一些软件会怎样?

做包皮手术前需要准备什么？

旧房改造装修费用都包括哪些内容

谁能告诉我三轴式变速器有什么组成？三轴式变速器不包括：A输入轴B输出轴C中间轴D倒挡轴

10JSD140变速箱中的大中心距是什么意思,有什么作用

联想手机A520为什么在下载软件的时候老是提示应用程序未安装？

从山东淄博坐火车怎样到山西大同