怎样将excel里总人数分成100份,然后选出每份中的第一个人

如题所述

推荐答案 2015-09-13

Sub renshu()
Dim i, p%
i = Int(Sheet1.[a65535].End(xlUp).Row / 100) '计算分成多少份
MsgBox "每份100人，一共有" & i & "份"
For p = 1 To i
Cells(p, 2) = Cells(p * 100 + 1, 1).Value '假设姓名在A列，从A1开始，将结果按顺序写入第二列
Next
End Sub

运行上面的vba程序，可获得结果

温馨提示：答案为网友推荐，仅供参考

当前网址：http://66.wendadaohang.com/zd/U2D9sDnD22iss229929.html

其他回答

第1个回答 2015-09-13

表格文件呢，上传附件看看啊

相似回答

excel如何筛选每组排在第一的数据,以及本组数据的中位数答：=IF(SUMPRODUCT(N(A$2:A2=A2))=1,"第一人","")将公式向下复制。筛选D列为“第一人”的行。在E2输入公式：=IF(D2="","",MEDIAN(IF(A$2:A$100=A2,C$2:C$100)))公式以CTRL+SHIFT+ENTER三键结束。将公式向下复制。

excel如何将一组数据中选出第一个和最后一个数据答：直接在第256行输入统计非空单元格的函数，不就知道最后一个了？第一个当然是1.例如第一列非空单元格数为221，那么你要的数据就是：1.1.1——1.1.221

在excel中,怎么把编号相同的人中的第一个出现的筛出来?谢谢!_百度知...答：=vlookup($H2,$H:$J,3,0)

excel如何筛选出第一个重复的值?答：D1:=IF((COUNTIF(INDIRECT("A"&LOOKUP(ROW(),IF(TEXT(B$1:B$100,"1;-1;1;""2""")<>TEXT($B$2:$B$101,"1;-1"),ROW($2:$101))):A2,MAX(A:A))=1)*(A2=MAX(A:A)),C2,"")ctrl+shift+回车，下拉。(注：B列0值做大处理)...

我有两张EXCEL表一张有100人,还有一张比第一张多一人(101人)现在我想把...答：把两个表内容复制到一张表内例姓名在A列，则在B列输入函数=countif(A1,$A$1:$A$202)然后复制下拉函数。数据为1的就是多出来的那个人

怎样将excel表格批量分行显示?答：1. 第一步，打开电脑后，任意选择一个excel表格文件，将其打开，进入主页后，选中要换行的数据，然后使用快捷键ctrl+f，打开查找和替换对话框，在其中点击替换选项。2. 第二步，在替换页面下，将查找内容设置为逗号，这里可以根据自己的需要自行选择。3. 第三步，在替换为右侧的输入框中输入ctrl+J，...

大家正在搜

excel一个表格分成2个 excel一个表格内容分成2个 excel一个单元格怎么分成两行 excel统计总人数 excel表格求总人数 excel求人数总和 excel一行分成多行 excel一列分成多列 excel计算人数