当前位置:首页 > 行业动态 > 正文

excel打乱名单顺序排列

在Excel中,可以使用RAND()函数和RANK()函数来打乱名单顺序排列。具体操作如下:

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

0