首页 > 广西 > 南宁市 > 随机抽取，excel 随机抽取样本

随机抽取，excel 随机抽取样本

来源：整理时间：2023-06-03 08:31:46 编辑：好学习手机版

本文目录一览

1，excel 随机抽取样本
2，excel随机抽取

1，excel 随机抽取样本

假定数组在A1:A50 那么在B1 到 B10 、C1到C10 ..... 每个单元格里输入以下公式就可以实现随机抽取（可以向下向左拉填充柄）随机抽取 =INDEX($A$1:$A$50,INT(RAND()*50),1)

excel 随机抽取样本

2，excel随机抽取

按ALT+F11, 将如下代码放到 Thisworkbook 中,回到你的表,按ALT+F8执行Seperate_random 这个宠Public Sub Seperate_random() Dim i As Long Range("C1").FormulaR1C1 = "=RAND()" Range("C1").Select Selection.AutoFill Destination:=Range("C1:C20000") Range("C1:C4").Select Columns("A:C").Select ActiveSheet.Sort.SortFields.Clear ActiveSheet.Sort.SortFields.Add Key:=Range("B:B"), _ SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal ActiveSheet.Sort.SortFields.Add Key:=Range("C:C"), _ SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal With ActiveSheet.Sort .SetRange Range("A:C") .Header = xlGuess .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .apply End With Application.Calculation = xlManual Cells(1, 3) = Cells(1, 3) + 1 For i = 2 To 20000 If Cells(i, 2) <> Cells(i - 1, 2) Then Cells(i, 3) = Cells(i, 3) + 1 Else Cells(i, 3) = Cells(i, 3).Value End If Next i Application.Calculation = xlCalculationAutomatic Columns("A:C").Select ActiveSheet.Sort.SortFields.Clear ActiveSheet.Sort.SortFields.Add Key:=Range("C:C"), _ SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal With ActiveSheet.Sort .SetRange Range("A:C") .Header = xlGuess .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End WithEnd Sub处理后前5000的就是你要的随机的.

假定数组在a1:a50那么在b1 到 b10 、c1到c10 .....每个单元格里输入以下公式就可以实现随机抽取（可以向下向左拉填充柄）随机抽取=index($a$1:$a$50,int(rand()*50),1)

excel随机抽取

文章TAG：随机抽取 excel 抽取样随机抽取随机抽取样本

最近更新

徐霞客的探险故事，用一句话概括徐霞客探险的内容
用一句话概括徐霞客探险的内容《徐霞客游记》是中国最早的一部详细记录所经地理环境的游记，也是世界上最早记述岩溶地貌并详细考证其成因的书籍。2，徐霞客的奇事又哪些有一次，他去黄山考察， ......
【南宁市】日期：2023-05-06
怎样写信的格式,亲爱的一封信四个汉字!
(写在两个空格内)正文(写在顶部空格内)这种称呼或问候(写在两个空格内)在右下角写上你的名字和日期例如:亲爱的XXX:你好,写信of格式:(顶框)亲爱的(或心爱的)XXX:(空白两 ......
【南宁市】日期：2023-05-06

故乡的食物，家乡的美食作文600字南安板鸭
家乡的美食作文600字南安板鸭我出生在湖北省襄阳市，那是一个依山傍水的美丽的古城。今天，我来为大家介绍一下家乡的美食——豆腐面。豆腐面十里飘香，走在大街上，一闻到豆腐面的香气就不由 ......
【南宁市】日期：2023-05-06
哪吒的师傅是谁，哪吒的师傅是谁
本文目录一览1，哪吒的师傅是谁2，哪吒的师傅是谁呢3，封神演义哪吒的师傅又是谁呢4，哪吒的师傅叫什么5，哪吒师傅是谁1，哪吒的师傅是谁哪吒的师傅是太乙真人太乙真人太已真人,{0}2 ......
【南宁市】日期：2023-05-06

李亨,李亨即位为唐肃宗李亨
李亨最初被封为陕西王，开元十五年(727)迁为忠君,唐玄宗逃往西方，国家一日不能无君，于是李亨即位,2.李亨原本被封为忠君，但直到原太子被废，才被立为皇太子，而李亨和李亨的生母是窦 ......
【南宁市】日期：2023-05-06
阳朔山水甲桂林，桂林山水甲天下阳朔山水甲桂林什么意思
本文目录一览1，桂林山水甲天下阳朔山水甲桂林什么意思2，桂林山水甲天下阳朔山水甲桂林的意思3，桂林山水甲天下阳朔山水甲桂林是什么意思4，阳朔山水甲桂林前句是什么5，桂林山水甲天下阳 ......
【南宁市】日期：2023-05-06

卢旺达大饭店,卢旺达饭店"改编电影适合人群
剧情简介1994卢旺达宣布独立后，胡图族和图西族部落之间发生多次冲突，战争持续不断,在这样的背景下，卢旺达饭店管理者保罗一直在四处奔走，最终成功解救了饭店中的1000多名图西族和胡 ......
【南宁市】日期：2023-05-06
什么是机械表，什么是机械手表
什么是机械手表机械表的叫法是相对于电子石英表叫的，指的是一弹簧发条蓄能为动力，以齿轮传动方式运作，指针表示时间的计时钟表，真心再帮你期待采纳，手表基本可以分成两大类：一类是电子手表 ......
【南宁市】日期：2023-05-06

相关文章

南宁市最新文章

广西排行榜推荐

南宁市排行榜精选

南宁市文章排行榜