1. excel随机抽取n个人名
加一列辅助列=rand()生成一组随机数,然后再一列判断分组。如随机数在A1:A40,那么在B1:B40输入数组函数 =TRUNC((RANK(A2:A41,$A$2:$A$41)-1)/5)+1
2. excel随机选取多个人名
如果是Excel 2007/2010/2013,可以直接自动筛选。如果是Excel 2003,可以用自定义筛选某某姓名或某某姓名,如果姓名很多,可用高级筛选,在辅助列(假设是A列)中,A1输入标题“姓名”,A2开始输入要筛选的姓名,接着A3、A4……继续输入姓名,以A列作为高级筛选的条件进行筛选就可以了。
3. 怎么用excel实现一个随机抽取名字的功能
1 先将所有不重复的题目依次编号
2 再将所有编号放在a列依次排列
3 将与a列中有编号的单元格相邻的b列单元格都加上随机函数rand
4 点击b列中任意一个有数值的单元格,再点-排序
5 现在只要在a列中选择需要的前n个题目编号即可
4. excel随机抽取5个人名
在excel工作表中,随机抽取一个或两个数,用函数可以实现,但是很麻烦不高效,怎么快速实现随机抽取数据呢?
1在excel工作表里,随机抽取一个数或两个数。
2选择数据区域,随机重复,随机抽取
3选择抽取的个数。不勾选抽中的单元格置空,选择存放位置,完成
4如果抽中的单元格数据删除,勾选抽中的单元格置空
5选择存放位置,确定,快速随机抽取数据,完成
5. 随机抽取多个姓名
您好,在excel中要随机抽取三个姓名,需要多个函数进行配合,主要用到了Index函数、Match函数、Small函数。
具体公式如下:=INDEX(B:B,MATCH(SMALL(I:I,A4),I:I,0))
6. excel随机抽取1个名单
1、电脑打开Excel表格,要在A列中随机抽取一组数据。
2、在C列中输入公式=INDIRECT("a"&RANDBETWEEN(1,10))。
3、输入公式后,回车后,就会随机生成一个数据。
4、下拉复制公式,就会随机生成其他数据。
5、A列中更改数据,C列中的公式也会随机改变数据。
7. 用excel随机抽名字用什么函数
1。如何实现VB与EXCEL的无缝连接
VB 是常用的应用软件开发工具之一,由于VB的报表功能有限,而且一旦报表格式发生变化,就得相应修改程序,给应用软件的维护工作带来极大的不便。因为有很多程序员现在已经充分利用Excel的强大报表功能来实现。
但由于VB与Excel分别属于不同的应用系统,如何把它们有机地结合在一起,是一个值得我们研究的课题。
笔者在软件开发工作中,对VB的自动化功能和Excel的宏功能进行了一定的研究,实现了VB与Excel的有机结合。现提出来与大家探讨。
一、VB读写Excel表
VB本身的自动化功能可以读写Excel表,其方法如下:
1、在工程中引用Microsoft Excel类型库:
从“工程”菜单中选择“引用”栏;选择Microsoft Excel 9。
0 Object Library (Excel2000),然后选择“确定”。表示在工程中要引用Excel类型库。
2、在通用对象的声明过程中定义Excel对象:
Dim xlApp As Excel。Application
Dim XlBook As Excel。
WorkBook
Dim xlSheet As Excel。Worksheet
3、在程序中操作Excel表常用命令:
Set xlApp = CreateObject (“Excel。Application”)’创建Excel对象
Set XlBook = xlApp。
Workbooks。Open(“文件名”) ’打开已经存在的Excel工作薄文件
xlApp。Visible = True ’设置Excel对象可见(或不可见)
Set xlSheet = xlBook。Worksheets(“表名”)
xlSheet。
Cells(row,col) = 值 ’给单元格(row,col)赋值
xlSheet。PrintOut ’打印工作表
xlBook。CloseTrue ’关闭工作薄
xlApp。Quit ’结束Excel对象
Set xlApp = Nothing ’释放xlApp对象
xlBook。
RunAutoMacros xlAutoOpen ’运行Excel启动宏
xlBook。RunAutoMacros xlAutoClose ’运行Excel关闭宏
4、在运用以上VB命令操作Excel表时,除非设置Excel对象不可见,否则VB程序可继续执行其它操作,也能够关闭Excel,同时也可对Excel进行操作。
但在Excel操作过程中关闭Excel对象时,VB无法知道,如果此时使用Excel对象,则VB程序会出现自动化错误,形成VB程序无法完全控制Excel状况,使得VB与Excel脱节。
二、Excel的宏功能
Excel 提供了一个Visual Basic编辑器,打开Visual Basic编辑器,其中有一工程属性窗口,点击右键菜单的“插入模块”,则增加一个“模块1”,在此模块中可以运用Visual Basic语言编写函数和过程并称之为宏。
其中,Excel有两个自动宏:一个是启动宏(Sub Auto_Open()),另一个是关闭宏(Sub Auto_Close())。它们的特性是:当用Excel打开含有启动宏的工作薄时,就会自动运行启动宏,同理,当关闭含有关闭宏的工作薄时就会自动运行关闭宏。
但是通过VB的自动化功能来调用Excel工作表时,启动宏和关闭宏不会自动运行,而需要在VB中通过命令 xlBook。RunAutoMacros(xlAutoOpen)和xlBook。RunAutoMacros(xlAutoClose)来运行启动宏和关闭宏。
三、VB与Excel的相互沟通:
充分利用Excel的启动宏和关闭宏,可以实现VB与Excel的相互沟通,其方法如下:
在Excel的启动宏中加入一段程序,其功能是在磁盘中写入一个标志文件,同时在关闭宏中加入一段删除此标志的程序。
VB程序在执行时通过判断此标志文件存在与否来判断Excel是否打开,如果此标志文件存在,表明Excel对象正在运行,应该禁止其它程序的运行。如果此标志文件不存在,表明Excel对象已被关闭,此时如果要使用Excel对象运行,必须重新创建Excel对象。
四、举例
1、在VB中,建立一个FORM,在其上放置两个命令按钮,将Command1的Caption属性改为Excel,Command2的Caption属性改为End。然后在其中输入如下程序:
Dim xlApp As Excel。
Application '定义Excel类
Dim xlBook As Excel。Workbook '定义工作薄类
Dim XlSheet As Excel。Worksheet '定义工作表类
Private Sub Command1_Click() '打开Excel过程
If Dir(“D:\temp\ ”)= “”Then '判断Excel是否打开
Set xlApp = CreateObject(“Excel。
Application”) '创建Excel应用类
xlApp。Visible = True '设置Excel可见
Set xlBook = xlApp。Workbooks。Open(“D:\temp\bb。xls”) '打开Excel工作薄
Set xlSheet = xlBook。
Worksheet(1) '打开Excel工作表
xlSheet。Activate '激活工作表
xlSheet。Cells(1,1) = “abc” '给单元格1行驶列赋值
xlBook。RunAutoMacros(xlAutoOpen) '运行Excel中的启动宏
Else
MsgBox(“Excel已打开”)
End If
End Sub
Private Sub Command2_Click()
If Dir(“D:\temp\ ”)<> “” Then '由VB关闭Excel
xlBook。
RunAutoMacros(xlAutoClose) '执行Excel关闭宏
xlBook。Close(True)关闭Excel工作薄
xlApp。Quit '关闭Excel
End If
Set xlApp = Nothing '释放Excel对象
End
End Sub
2、在D盘根目录上建立一个名为temp的子目录,在temp目录下建立一个名为“bb。
xls”的Excel文件。
3、在“bb。xls”中打开Visual Basic编辑器,在工程窗口中点鼠标键选择插入模块,在模块中输入以下程序存盘:
Sub auto_open()
Open “d:\temp\ ” For Output As #1
Close #1
End Sub
Sub auto_close()
Kill “d:\temp\ ”
End Sub
4、运行VB程序,点击Excel按钮可以打开Excel系统,打开Excel系统后,VB程序和Excel分别属两个不同的应用系统,均可同时进行操作,由于系统加了判断,因此在VB程序中重复点击Excel按钮时会提示Excel已打开。
如果在Excel中关闭Excel后再点Excel按钮,则会重新打开Excel。而无论Excel打开与否,通过VB程序均可关闭Excel。这样就实现了VB与Excel的无缝连接。
2。用VB。NET结合Excel设计统计生产报表
用EXCEL做企业生产报表的理由
Excel表格生成和公式设置十分强大便利,是一个强有力的信息分析与处理工具。
特别是EXCEL的公式、函数、VBA语言,功能极其强大。我试用过其他电子表格软件,在功能上和EXCEL根本没有可比性。
Visual Studio ,NET也同样是MicroSoft的产品,Visual Studio ,NET调用EXCEL做企业报表十分方便。
证明当时我选Visual Studio ,NET作为首选开发工具是正确的。
软件构思
先在EXCEL里定制好名为《统计表》的样表(模版),,在样表中设置好各种格式,填写好固定项。
在窗体上放很三个控件,两个DateTimePicker控件,用来选择开始统计时间和结束统计时间。
一个Button以启动程序。
软件欲实现的功能是:点击Button1,自动查找符合日期符合日期范围的生产计划工作表,然后利用SortedList统计各个办事处的计划数量和未完成数量,及各个产品型号的计划数量和未完成数量。再把SortedList的数据读出写到《统计表》中。
这里要注意的是,各个生产报表格式必须规范统一,因为程序是按照固定单元格位置读取数据的。
SortedList类
除了具备VB,NET调用EXCEL的基础知识外,本例主要用到SortedList类。
SortedList类表示键/值对的集合,这些键和值按键排序并可按照键和索引访问。
SortedList 是 Hashtable 和 Array 的混合。当使用 Item 索引器属性按照元素的键访问元素时,其行为类似于 Hashtable。当使用 GetByIndex 或 SetByIndex 按照元素的索引访问元素时,其行为类似于 Array。
SortedList 在内部维护两个数组以将数组存储到列表中;即,一个数组用于键,另一个数组用于相关联的值。每个元素都是一个可作为 DictionaryEntry 对象进行访问的键/值对。键不能为空引用(Visual Basic 中为 Nothing),但值可以。
SortedList 的容量是列表可拥有的元素数。随着向 SortedList 中添加元素,容量通过重新分配按需自动增加。可通过调用 TrimToSize 或通过显式设置 Capacity 属性减少容量。
SortedList 的元素将按照特定的 IComparer 实现(在创建 SortedList 时指定)或按照键本身提供的 IComparable 实现并依据键来进行排序。
不论在哪种情况下,SortedList 都不允许重复键。
VB,NET结合EXCEL统计生产报表
以下是实现代码,供参考。为方便初学者,部份地方加以注释。
现在让我们来试用一下,先选择开始统计时间和结束统计时间,点击Button1,程序就自动统计出各个办事处的及各个产品的有关计划数量及未完成数量,是不是很方便。
。
8. excel怎么随机抽几个人
全部名字放在一列(假设是A列) 在B列加一个辅助列,在B1中输入或复制粘贴此公式 =RAND() (说明:这是随机函数) 下拉填充或双击B1右侧的填充柄 选中B列任一非空单元格 单击或多次单击常用工具栏上的升序排序或降序排序图标 在C1中输入或复制粘贴此公式 =INDIRECT("A"&(COLUMN(A:A)-1)*68+ROW($A1)) 右拉填充到E列 选中C1:E1,下拉填充到第68行
9. excel随机抽取n个人名不重复
这里我讲一个简单操作,不涉及复杂函数的方法吧。
我们设定一个范围,比如选取1-100随机不重复的10个数字。
1、在A1输入数字1,填充到A100达到数字100
2、在B1输入函数=rand() 我们把鼠标放在B1右下角,等鼠标变为+号之后双击,填充公式至B100
3、我们在[开始]选项卡中,选择自定义排序
我们[主要关键字]选择[列B]点击确定
4、我们需要10个随机数,那么前十个数字就是我们需要的了。
备注:我们需要多少的随机数字及区间,都可以使用这样的方法进行调节。
原理介绍:rand函数是一个随机函数,跟它对应的A列会被B列的排序打乱,正好A列是1-100不重复的数字,这样就得到了随机不重复的数字。
10. excel随机不重复抽取人名
在名单表随意添加一个辅助列, 输入 =RAND(),向下复制直到名单末尾, 按辅助列排序,名单顺序就打乱了, 从中随便选择连续的30个人名字复制出去就可以了
11. excel中随机抽取人名
具体步骤如下: 进入需要做统计的工作薄,数据不多的情况下可以通过数据-自动筛选-选择任一姓名,点击整个D列,也是可以统计出数量的,不过还是需要手工记下数据。
还可以采用SUMIF函数统计;步骤为: 做一个简单的表格,设置一个姓名的下拉菜单,姓名对应业绩合计; 在G3单元格内输入函数,即=sumif; 在函数括号内,区域选择C3-C12,也就是姓名那一列全选;条件选择f3,就是做了下拉菜单的那一个单元格;求和区域选择D3-D12,也就是业绩的全部数据。
- 相关评论
- 我要评论
-