你的意思是从一个范围内随机抽取一个号码吗？ 请在A1填入一个最小值，请在B1输入一个最大值，请在C1输入公式 =RANDBETWEEN(A1,B1) A1和B1不要锁定，方便随时更改摇号范围。C1单元格可以锁定。 F9键是刷新键，每按一次F9键，C1显示的结果会变化一

如何制作简易号码抽签？下面介绍一下如何使用Excel制作简易抽签号码。

方法

打开Excel

材料/工具：Excel2010 1、打开电脑后，直接进入到excel软件中，新建一个空白的表格文档，在表格中某一列单元格中录入好我们要抽取的内容，例如姓名，编号等等。 2、录入完成后，我们在当前表格文档中重新再去选择一个单元格，将其作为最终抽取结

选择合适的单元格。

如果是随机抽签，那么应该先有个自动生成随机数的区域，假如有55个学生，那么在R列的R1:R55输入=RAND() 按Ctrl+Enter组合键结束； 然后在座位号中输入=RANK($R1,$R:$R)这样的排序公式，每按一次F9，R列的随机数更新一次，座位号也重新刷新一次。

点击“合并并居中”。

用了两个函数实现的，双击任意单元格会刷新抽签。确定抽签顺序后建议复制姓名和排名，选择性粘贴为文本。见图种，另存为图片，该后缀为rar，解压可得excel原表格

输入以下公式：=INT(RAND()*(100+1))

新建一个空白excel表格 选中多个单元格，并进行合并居中（本步骤可以省略） 选中单元格，输入公式=INT(RAND()*(100-1+1))+1，按回车键确认 1.记住连同=号一起输入； 2.如果是在1-50中抽取，则将公式中100替换成50，以此类推。选中单元格，在“开

修改字体大小。

最简单的办法用rand函数+排序的方法 假设你的表含有表头并且50个人名在A列，将B列作为辅助列，在B2中输入以下公式并下拉 =INT(50*RAND())+1 然后以B列为关键列进行排序即可。 注：如果是07或07以上版本B2中公式可写成以下形式： =RANDBETWEEN(1,

按F9可以刷新。多次按F9即可获得随机抽签数。

A列1-22 B列数22个随机数字 然后排序B列 给B列复制出来让你的团队选择，选择完了把对应的名字填到C列就可以了

扩展阅读，以下内容您可能还感兴趣。

excel或者ppt制作抽签

裁53张小纸条，分别写上1-53的号码，每人抽一张。

某单元格输入：

=ROUND(RAND()*53,)+1，（EXCEL2003版）

=RANDBETWEEN(1,53)，（EXCEL2007版）

每按一次F9键，将随机产生一个1-53的数字。追问我这个需要演示的，所以你这个方法我这还真不能采纳，谢谢！

如何利用excel的VB按钮进行分班抽签

最简单的用法:

1.在控制工作栏中选多按钮放入工作表中,修改其CAPTION属性(文字);

2.在其LINKCELL中输入:如A1(你要要通过按钮改变的单元格)

3退出设计模式,当你选中其中一个时,对应的单元格的内容将变化(true/false)

4:当然你改变其中一个单元格内容时,其它单元格也会变化,按钮也变化:

空值:按钮灰显;

true/非0的数字均认为是选中.

false/0表示为未选中.

5.如果有更进一步的其它需要,还可以对按钮事件进行编程解决更复杂的问题.追问看不明白，有图文的吗?

我想用excel做一个自动抽签程序( 以下是电脑报里面介绍的内容，不知道为什么在我的电脑里操作失败了）

同时按Alt和F11进入宏界面，点菜单的插入，模块，粘贴如下代码：

Dim Flag As Boolean

Sub aaa()

Dim cell As Range

Do Until Flag

Range("C6:G10").Cells(Int(Rnd() * 25) + 1).Select

DoEvents

Loop

Flag = False

End Sub

Sub bbb()

Flag = True

End Sub

回到Excel，在C6:G10输入25个签（代码中的粗体字按实际修改），插入两个图形比如方框，一个写”抽签“，一个写”暂停“，右键点第一个框，指定宏，aaa；右键点第2个框，指定宏，bbb

就可以了。

用Excel做一个抽签器，有按钮的那种，可以帮忙写个代码吗？

按图操作就可以做成10选3的随机抽签样版。

excel如何实现随机抽取且不重复

方法一：公式法

1、我们以生成1-10范围内的随机数字为例，讲述方法。

首先，在A2单元格中输入公式：=SMALL(IF(COUNTIF($A$1:A1,ROW($1:$11))=0,ROW($1:$11)),INT(RAND()*(11-ROW(A1))+1))

然后按下Ctrl+Shift+Enter三键结束数组公式。

2、然后，下拉填充公式到A12单元格，也就是填充11个单元格，为什么要填充11个呢，我们明明只要10个数字？这是因为，最后一个数字是不会变化的，所以呢，要生成10个随机数，需要填充11个单元格，同样的生成11个随机数的话，要填充12个单元格，除此之外，公式中的11还要改成12。

3、生成随机数后，每按下一次F9（或者其他单元格进行一次计算），随机数就会刷新一次，重新生成一组随机数，要注意喽！

4、好了，一组不重复的随机数字生成了，现在我们回头看看这个公式是怎么实现的吧。首先看Small函数的第一个参数，也就是数字区域，这里是利用if和Countif函数来实现此单元格上面的单元格区域，是否有当前单元格的数字，如果有，就返回False，而如果没有就返回这个数字，从而生成一组由上面单元格没有的数字和Flase组成的序列，下图是按F9得到的结果：

5、Small函数的第二个参数，也就是从这个序列中取第几个最小值，在得到的数字中，利用随机函数rand和row函数，实现在这有个个数中随机抽取一个数字，从而得到排序中这个数字顺序的一个数字。通过这样一个数组公式，就实现了生成一组不重复的随机数字啦。

方法二：VBA法

1、VBA功能强大，可以利用很多算法实现随机数。这里介绍一种简单的办法。首先在Excel中按下Alt+F11，打开VBE界面，双击要生成随机数的工作表，在右侧空白处需要输入代码。

输入代码如下：

Sub m()

Range("A:A").ClearContents'这里是A列，根据需要修改

For i = 1 To 10'这里是10个数字，根据需要修改

kkk:

Randomize

x = Int(Rnd * 10) + 1

If Application.CountIf(Range("A:A"), x) = 0 Then

Cells(i, 1) = x

Else

GoTo kkk

End If

Next i

End Sub

2、代码原理很简单，就是随机生成数字，如果A列中有了这个数字，就返回再次随机生成，一直到没有这个数字为止；利用循环生成制定数量的数字。

3、按下F5执行代码，就看到在对应的Sheet中的对应列，生成了一组随机的不重复的数字。