vba随机抽取人名不重复_excel启用宏,通过vba实现从数字数组里随机获取N个不重复的数字...
我们以WPS打开excel为例:
1,要先给WPS安装VBA插件,在百度里搜索“VBA7.0.1590_For WPS(中文).exe”,然后下载安装
2,打开excel文档,在顶部菜单“开发工具”里点击“VB编辑器”
3,在打开的Microsoft Visual Basic编辑器里,在左侧菜单“Project(工作簿1)”上点击右键,选择插入“模块”
4,在默认打开的模块1里,输入代码:Function getRandNum(data As String, num As Integer)
'Application.Volatile '标记易失函数
Dim d As Object
Set d = CreateObject("Scripting.Dictionary") '定义字典
dataArr = Split(data, ",") '拆分
ReDim result(1 To num)
Do Until (n >= num)
randNum = VBA.Int(VBA.Rnd() * (UBound(dataArr) - 0 + 1)) '范围
keystr = dataArr(randNum)
If Not d.exists(keystr) Then
n = n + 1 '累计
d(keystr) = ""
result(n) = keystr '写入
End If
Loop
getRandNum = Join(result, ",") '组合
Set d = Nothing
End Function
5,点击保存,会让你重新保存文档为.xlsm格式
6,关闭Microsoft Visual Basic编辑器,然后都可以在表格里使用=getrandNum(data,num)公式了
7,上面公式中data,num2个参数可以直接写死,也可以从其他单元格单元格中动态读取,注意num的数字不能大于data数组中的个数,如下图所示:
vba随机抽取人名不重复_excel启用宏,通过vba实现从数字数组里随机获取N个不重复的数字...相关推荐
- vba随机抽取人名不重复_excel筛选重复姓名 求出Excel中不重复的人的姓名的VBA代码...
excel筛选重复姓名 求出Excel中不重复的人的姓名的VBA代码,看到标题你是不是很兴奋,这不就是你想学习的知识吗?当你掌握excel筛选重复姓名这个知识的时候你一定很兴奋,一定不会后悔看了exc ...
- python随机抽取人名_python的random
python的random函数 更多的random用法可参阅: random --- 生成伪随机数 - Python 3.7.4 文档docs.python.org 以下使用了: 洗牌:random ...
- python随机抽取人名_python实现艾宾浩斯背单词功能,实现自动提取单词、邮件发送,再也不用担心背单词啦...
已经完成了利用python爬虫实现定时QQ邮箱推送英文文章,辅助学习英语的项目,索性就一口气利用python多做一些自动化辅助英语学习的项目,对自己的编程能力和英文水评也有一定的帮助,于是在两天的努 ...
- excel2010 中 启用宏,VBA使用 说明
1,打开excel2010 2,在工具栏空白处,右击:自定义功能区---选择添加 开发工具 选项 -- 确定 3,点开 开发工具 菜单项,点击 宏安全 4,选中 ActiveX 设置, 选中右边的 ...
- vba随机抽取人名不重复_VBA编程实现不重复随机数输出
作者:iamlasong VBA编程实现不重复随机数输出.VBA里的随机函数是RND,在工作表中随机函数是RAND,一字之差,可要记好了.RND取值范围是[0,1),意思是0和1之间的一个随机数,包含 ...
- vba随机抽取人名不重复_用vb编写了这个随机抽取人名的抽奖系统,但会出现重复,怎么样做到不重复并添加一个记录显示已抽到的人名...
满意答案 vbuju 2013.09.10 采纳率:54% 等级:12 已帮助:5912人 我给你个简单的例子.你看下 Option Explicit Dim jm(35) As String ...
- python随机抽取人名_用Python打造一个CRM系统(五)
在上一篇上实现了线索功能模块,在实际使用中除了线索数据除了输入的结构化数据,也有可能是来自非结构化数据,如名片.PDF文档.语音视频等.为方便线索录入,本篇中将以名片为例,实现利用OCR等技术将名片信 ...
- 从列表、字符串、元组或集合中随机抽取指定个元素 Python中random模块的sample()函数
选择题 以下python代码的输出结果不可能为? from random import sample s = ['a','b','c','d'] result = sample(s,3) print( ...
- 用python写个随机抽取姓名的程序
需要准备一个姓名列表.例如: names = ['Alice', 'Bob', 'Charlie', 'David', 'Eve'] 使用 random.choice() 函数从列表中随机抽取一个姓名 ...
- 快速地随机抽取一定比例的BAM文件
当我们在分析多少X的数据量可以满足我们需求的时候,此时就需要从一个BAM文件当中,快速随机抽取一定比例的BAM文件了.命令非常简单,下面是随机抽取10%比例的BAM文件: java -Xmx16g - ...
最新文章
- IEEE“撑不住”了?声明解除对华为评审限制
- Leetcode 350 两个数的交集2
- 足不出户完成交付独家交付秘籍(第二回)
- hdu 6127---Hard challenge(思维)
- 图像增强_Keras 常用的图像增强方式
- 【Java】探究Java实现多接口时同名方法冲突问题
- 容器映像_构建微小的容器映像
- Linux就该这么学 20181008(第十三章BIND)
- Golang包管理工具之govendor的使用
- bootstrap菜单html,Bootstrap实现下拉菜单效果
- ednote服务器运行失败,Endnote安装出现错误的解决办法
- 蝴蝶网络 Butterfly network
- RegAsm安装卸载办法
- 初识流媒体与流媒体技术
- 保持好距离才会保持好爱情!情侣间最好的距离!很值得一看!
- js中如何将object转化为json数据,json数据转js对象
- cakephp笔记——find()函数
- 礼品定制APP开发的功能
- Opencv每日函数 图像分割模块 watershed分水岭算法
- 计算机辅助设计与制造的应用,计算机辅助设计与制造(UG)
热门文章
- 红帽linux中文语言包,英文 RedHat AS5 中文语言包安装
- 如何双击连上校园网NCUWLAN?---bat+Python3给出了可行性答案
- 计算机博弈大赛源代码,2020计算机博弈大赛幻影围棋分组第一天 信息交互模块...
- 地缘剧本杀 (十一):疗伤(原创小说连载,内含语音)
- [2020-11-30 ]国产化操作系统调研
- 英语单词常见后缀词性
- 人员基础信息一体化采集系统平台
- Ipad2.4 9.3.5 降级8.4.1方法
- JS实现实时显示时间
- 蓝鸽无盘服务器,蓝鸽英语学习平台为什么点击游客就能进去?