新聞中心
Excel教程:如何在電腦辦公軟件Excel中打亂名單順序

創(chuàng)新互聯(lián)專注于莊浪網(wǎng)站建設(shè)服務(wù)及定制,我們擁有豐富的企業(yè)做網(wǎng)站經(jīng)驗。 熱誠為您提供莊浪營銷型網(wǎng)站建設(shè),莊浪網(wǎng)站制作、莊浪網(wǎng)頁設(shè)計、莊浪網(wǎng)站官網(wǎng)定制、小程序設(shè)計服務(wù),打造莊浪網(wǎng)絡(luò)公司原創(chuàng)品牌,更為您提供莊浪網(wǎng)站排名全網(wǎng)營銷落地服務(wù)。
單元1:準(zhǔn)備工作
打開Excel軟件并創(chuàng)建一個新的工作表。
在第一行輸入名單的標(biāo)題,姓名”。
在第二行開始輸入名單的具體內(nèi)容。
單元2:使用隨機函數(shù)打亂名單順序
在名單下方的空白單元格中輸入以下公式:=RAND()
將該公式拖動到與名單內(nèi)容相同的行數(shù)。
選中名單和隨機函數(shù)生成的列,點擊“數(shù)據(jù)”選項卡中的“排序”按鈕。
在彈出的對話框中,選擇按照隨機函數(shù)生成的列進行排序。
點擊“確定”按鈕,Excel會自動打亂名單順序。
單元3:使用篩選功能打亂名單順序
選中名單所在的列。
點擊“數(shù)據(jù)”選項卡中的“篩選”按鈕。
在每個名字旁邊會出現(xiàn)一個下拉箭頭,點擊箭頭。
在彈出的菜單中,選擇“隨機排序”。
Excel會重新打亂名單順序。
單元4:使用宏命令打亂名單順序
按下“Alt+F11”鍵,打開VBA編輯器。
在左側(cè)的項目資源管理器中,雙擊當(dāng)前工作簿的名稱。
在右側(cè)的代碼窗口中,輸入以下代碼:
Sub ShuffleNames()
Dim rng As Range
Dim i As Long, j As Long, temp As Variant
Set rng = ThisWorkbook.Worksheets("Sheet1").Range("B2:B" & Cells(Rows.Count, "B").End(xlUp).Row)
For i = rng.Rows.Count To 2 Step 1
j = Int((i 1) * Rnd + 1)
temp = rng.Cells(i, 1).Value
rng.Cells(i, 1).Value = rng.Cells(j, 1).Value
rng.Cells(j, 1).Value = temp
Next i
End Sub
按下“Ctrl+S”鍵保存代碼。
返回Excel工作表,按下“Alt+F8”鍵,選擇“ShuffleNames”宏,然后點擊“運行”。
Excel會重新打亂名單順序。
當(dāng)前題目:excel打亂名單順序排列
文章源于:http://m.fisionsoft.com.cn/article/dhpicho.html


咨詢
建站咨詢
