软件：Exce2016
电脑：华为MateBook14
系统：Windows10
1、打开文件，进入【开发工具】点击【visual basic】。
2、打开需要点名的所在sheet表，并输入代码，并单击【保存】。
3、弹出另存为，设置保存类型，将文件保存为xlsm。
4、在【开发工具】-【插入】一个按钮。
5、在弹出的“指定宏，选择sheet”点名，并点击【确定】。
6、更改控件上的名称“点名，并设置基本格式”，后点击【即可】。
设置一个足够大的随机池，给每一个学生分配相同的空间，然后利用随机数来选取被点名的学生，同时对该学生所分配的空间和其他学生的空间进行缩减或增加。然后执行下一轮。大致思路就是这样，希望能够帮到你哦~
思路：1、定义一个字典，把名字和数字对应起来；2、引用随机模块；3、输入要点名的个数，通过循环输出名字。
具体代码如下：
# -*- coding:utf-8 -*-from random import randint
DictName = {1: 'Aaron',
2: 'Abel',
3: 'Abraham',
4: 'Adam',
5: 'Adrian',
6: 'Alva',
7: 'Alex',
8: 'Alexander',
9: 'Alan',
10: 'Albert',
11: 'Alfred',
12: 'Andrew',
13: 'Andy',
14: 'Angus',
15: 'Anthony',
16: 'Arthur',
17: 'Austin',
18: 'Ben',
19: 'Benson',
20: 'Bill',
21: 'Bob',
22: 'Brandon',
23: 'Brant',
24: 'Brent',
25: 'Brian',
26: 'Bruce',
27: 'Carl',
28: 'Cary',
29: 'Caspar',
30: 'Charles',
31: 'Cheney',
32: 'Chris',
33: 'Christian',
34: 'Christopher',
35: 'Colin',
36: 'Cosmo',
37: 'Daniel',
38: 'Dennis',
39: 'Derek',
40: 'Donald',
41: 'Douglas',
42: 'David',
43: 'Denny',
44: 'Edgar',
45: 'Edward',
46: 'Edwin',
47: 'Elliott',
48: 'Elvis',
49: 'Eric',
50: 'Evan',
51: 'Francis',
52: 'Frank',
53: 'Franklin',
54: 'Fred',
55: 'Gabriel',
56: 'Gaby',
57: 'Garfield',
58: 'Gary'}
Num = raw_input('请输入需要点名个数:')
flag = True
while flag:
if Num.isdigit():
Ind = int(Num)
flag = False
else:
print '输入错误,请确认'
else:
for i in range(Ind):
print DictName[randint(1,58)]
运行结果：
请输入需要点名个数:4
Brant
Cheney
David
Alan
