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

Excel如何从一组数据中不重复随机抽取若干个呢？下面一起学习一下吧。

材料/工具

Excel

方法

1/6

如下图想要从左边区域中随机抽取四个不重复人员名单。

请点击输入图片描述

2/6

选中名单数据区域。

请点击输入图片描述

3/6

点击【随机重复】，选择【随机抽取】。

请点击输入图片描述

4/6

在【抽取个数】选项内录入4，然后点击【确定】。

请点击输入图片描述

5/6

点击G2单元格作为存放位置，然后点击【确定】即可完成。

请点击输入图片描述

6/6

完成效果如下图：

首先在excel表格中输入随机函数公式：=rand()。 2、点击回车并下拉公式即可得到一组随机函数，先将该组随机函数复制粘贴为数值，将其固定显示在单元格中。 3、然后再其右侧的空白单元格中输入公式：=RANK($B$3:$B$12,$B$3:$B$12)。 4、点击回车并下拉公式即可得到一组不重复的随机整数。利用一个辅助列比如C3到C12，在C3输入公式：=rand()向下拉到C12 2、然后在B3利用排序函数得到1~10的不重复数字，B3输入公式：=RANK(C3,$C$3:$C$12) 向下拉到B12。 如果你觉得C列碍眼，可以把C列隐藏，也可以先复制B列，再在B列选择性粘贴/数值/确定，就可以把C列删除了。甚至还有一个更简单的办法：把辅助列建在其他工作表，比如在Sheet2的C3（也可以其他单元格，但后面公式要相应更改）输入公式：=rand()向下拉到C12，然后在你的表格Sheet1的B3输入公式。Excel中，由952组数据中随机抽取360组不重复的数据。 方法/步骤 如果数据在Sheet2 的A:D列，在Sheet2的A列前插入两列辅助列； 在左上角的名称框中，输入A2:A953，按Enter键，将A2:A953单元格选中，输入=RAND()，按Ctrl+Enter组合键结束，快速向A2:A953单元格中输入随机数（随机数的重复机率极低）； excel如何实现随机抽取且不重复 在B2单元格输入以下公式，然后向下填充公式，得到A列数据的排名（同样没有重复排名） =RANK(A2,A:A) excel如何实现随机抽取且不重复 在Sheet1的A2单元格输入以下公式，然后向右向下填充公式到。

excel怎么从一组数据中随机抽取5个不重复的数 假设从A1到A100中随机取5 个不重复数，B2公式：

=IF(ROW(A1)=1,INDEX(A$1:A$100,RANDBETWEEN(1,100)),INDEX(A$1:A$100,SMALL(IF(COUNTIF(B$1:B1,A$1:A$100)=0,ROW($1:$100)),RANDBETWEEN(1,101-ROW(A1)))))

数组公式，需要按CTRL+SHIFT+回车，完成公式，下拉。

从长度为100的数字数组中随机抽取20个不重复的数字

int arrA[100] 长度为100的数组

int arrB[20]准备存放20个不重复的数字

for(int i = 0i <100i++) arrA[i] = rand()长度为100的数组中填充随机数，可能有重复的数字

for(int i = 0i <20i++) { 从100个数中抽取20个数

while(1){

int tempB = arrA[rand % 100]从100个数中随机抽取一个数

bool C = true定义布尔变量 如果重复则false 反之则true 默认重复

for(int j = 0j <ij++){

if (arrB[j] == tempB){ 判断有无重复

C = false

}

}

if (C){ 如果无重复

arrB[i] = tempB赋值

break跳出本次While循环进行下个数的抽取

}

｝

}

这种问题实现方法有很多种，这只是一种解决思路，C++语言编写，如果用转成C的话只需把所有的变量定义在函数头就可以了，rand()是STD库中提供的标准函数。

这个方法有个BUG就是如果当arrA数组中数小于20种，那么这段程序将陷入死循环中，解决办法是在抽取之前判断一下，arrA数组中数是不是小于20种,方法如下。

int datatype = 0arrA数组中数据种类

for(int i = 0i <100i++){

bool D = true

for(int j = 0j <ij++){

if (arrA[j] == arrA[i]){ 逐次判断有无重复

D = false

}

}

if (D) {

datatype++

}

}

如果datatype大于等于20，再执行抽取数据 *** 作。

以上代码未经过编译器，不一定直接能编译过去，但思路已表达清楚，纯手敲，望采纳。

excel 求教 我要在1-37中随机抽取12个不重复的整数，改怎么做？

写了一段VBA程序，执行后，12个数据出现在A1:A12

Sub Get12in37()

Dim RN, I1, I2, X

I1 = 1

While I1 <13

RN = Int(1 + Rnd * 37)

X = 0

For I2 = 1 To I1 - 1

If RN = Range("A" &I2) Then X = 1

Next

If X = 0 Then

Range("A" &I1) = RN

I1 = I1 + 1

End If

Wend

End Sub

excel数据怎么提取不重复的数据

开要过滤的excel文档，鼠标单击数据区，然后点击菜单栏中【数据】--【筛选】如下图所示，

Excel如何提取不重复内容，excel如何过滤重复

点击【高级筛选】

Excel如何提取不重复内容，excel如何过滤重复

在d出的对话框中，选中【将筛选结果复制到其他位置】，如下图所示

求大神做一vb程序。0-100里随机抽取50个不重复的整数

Randomize TimerDim a(100) As IntegerFor i = 1 To 100a(i) = iNextFor i = 1 To 9999x = Int(Rnd * 101): y = Int(Rnd * 101)t = a(x): a(x) = a(y): a(y) = tNextFor i = 1 To 50Debug.Print a(i)Next

excell中怎么设置函数，按F9就能从1到30个数中随机抽取10个不重复的整数

假设在A2向下得到不重复的1到30的整数，A2公式：

=IF(ROW(A1)=1,RANDBETWEEN(1,30),LARGE(IF(COUNTIF(A$1:A1,ROW($1:$30))=0,ROW($1:$30)),RANDBETWEEN(1,30-ROW(A1)+1)))

数组公式，需要按CTRL+SHIFT+回车完成公式，下拉到A11；

生成数据后，每按一次F9将随机生成10个不重复的数据。

随机产生几个不重复的数，vb

Private Sub Command1_Click()

Dim a As Integer, b As Integer, c As Integer

Randomize

a = 10 * Rnd

1: b = 10 * Rnd

If b = a Then

GoTo 1

End If

2: c = 10 * Rnd

If c = b Or c = a Then

GoTo 2

End If

Text1 = a &b &c

End Sub

EXCEL中如何从1、2、3、4、5、6中随机取2个不重复的数字。谢谢

如果只用EXCEL内部函数,可以在两个格中分别输入公式=INT(RAND()*5+1)

然后不停按F9键,直到不重复为止.

还可以用自定义函数,可直接得到不重复结果.

函数代码 如下:

Function zrnd(a, b)

Dim c As Integer, d As Integer

Application.Volatile True

10:00

c = Rnd() * (6 - a) + a

d = Rnd() * (6 - a) + a

If c = d Then GoTo 10

zrnd = c &" " &d

End Function

在任意格中输入公式zrnd(1,6)就可以得到两个不重复的1至6的随机数.

怎么从arraylist中读出不重复的 随机数，数组里面没有重复的数

Random r = new Random() List<int>list = new List<int>() for (int i = 0i <100i++){list.Add(r.Next(1, 100)) }int[] x 中，不包含重复的数int[] x = list.Distinct().ToArray()

excel 一行数据 有多少个不重复的数据

假设你的数据在a1:g1，输入数组公式

=SUM(--(MATCH(A1:G1&" ",A1:G1&" ",0)=COLUMN(A:G)))

假设你的数据在a1:a7，输入数组公式

=SUM(--(MATCH(A1:A7&" ",A1:A7&" ",0)=ROW(1:7)))

公式输入后以ctrl+shift+enter结束，用以添加花括号

公式的计算原理，利用数据在区域内的位置与行号（或列号）做比较，从而统计不重复数据的个数

优点是当区域内存在空值时，公式计算依然正确，

---