excel打乱名单顺序排列

Excel教程：如何在电脑办公软件Excel中打乱名单顺序

单元1：准备工作

打开Excel软件并创建一个新的工作表。

在第一行输入名单的标题，姓名”。

在第二行开始输入名单的具体内容。

单元2：使用随机函数打乱名单顺序

在名单下方的空白单元格中输入以下公式：=RAND()

将该公式拖动到与名单内容相同的行数。

选中名单和随机函数生成的列，点击“数据”选项卡中的“排序”按钮。

在弹出的对话框中，选择按照随机函数生成的列进行排序。

点击“确定”按钮，Excel会自动打乱名单顺序。

单元3：使用筛选功能打乱名单顺序

选中名单所在的列。

点击“数据”选项卡中的“筛选”按钮。

在每个名字旁边会出现一个下拉箭头，点击箭头。

在弹出的菜单中，选择“随机排序”。

Excel会重新打乱名单顺序。

单元4：使用宏命令打乱名单顺序

按下“Alt+F11”键，打开VBA编辑器。

在左侧的项目资源管理器中，双击当前工作簿的名称。

在右侧的代码窗口中，输入以下代码：

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会重新打乱名单顺序。