色天下一区二区三区,少妇精品久久久一区二区三区,中文字幕日韩高清,91精品国产91久久久久久最新毛片

首頁 > 廣西 > 南寧市 > 隨機抽取，excel 隨機抽取樣本

隨機抽取，excel 隨機抽取樣本

來源：整理 時間：2023-06-03 08:31:46 編輯：好學習 手機版

本文目錄一覽

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

主站蜘蛛池模板： 桐梓县| 广饶县| 沾益县| 赞皇县| 呼图壁县| 井冈山市| 邛崃市| 体育| 海林市| 永丰县| 揭东县| 加查县| 孟村| 元氏县| 广宁县| 聊城市| 裕民县| 阿克陶县| 鹤峰县| 寿宁县| 富蕴县| 广汉市| 双鸭山市| 库车县| 华容县| 若羌县| 乌审旗| 长宁县| 棋牌| 德化县| 佛山市| 根河市| 勃利县| 怀安县| 柏乡县| 汶川县| 金坛市| 集安市| 尚义县| 理塘县| 寿光市|