การจัดเรียงแบบสุ่มเป็นวิธีที่ง่ายและรวดเร็วเพื่อให้แน่ใจว่าคุณจะลงเอยด้วยทุกกรณีที่พลิกด้วยความน่าจะเป็นที่เท่ากัน ในบทช่วยสอนนี้ เราจะพูดถึงวิธีการสุ่มหรือสุ่มรายการใน Excel ในไม่กี่ขั้นตอน
ผู้ใช้ Excel เวอร์ชันใดก็ได้สามารถจัดเรียงชุดข้อมูลดั้งเดิมแบบสุ่มได้โดยใช้ RAND ฟังก์ชั่นด้วยความช่วยเหลือของ ประเภท โปรดทำตามขั้นตอนด้านล่าง
ขั้นตอนที่ 1: ป้อนสูตร RAND
เลือกเซลล์ถัดจากเซลล์บนสุดของรายการที่คุณจะสุ่ม ป้อนสูตร RAND ด้านล่างแล้วกด เข้าสู่.
=RAND()
ขั้นตอนที่ 2: เติมสูตร RAND ลงในเซลล์อื่น
ดับเบิลคลิกที่จุดจับเติม (สี่เหลี่ยมสีเขียวเล็กๆ ที่มุมขวาล่าง) ของเซลล์สูตรเพื่อใช้สูตรกับเซลล์ด้านล่าง
ขั้นตอนที่ 3: เรียงลำดับผลลัพธ์ RAND เพื่อสุ่มรายการ
1 เลือก B2: B8รายการที่มีสูตร RAND
2 คลิกที่ จัดเรียงและกรอง > เรียงลำดับจากน้อยที่สุดไปหามากที่สุด ใน การตัดต่อ กลุ่มใน หน้าแรก แถบ
3. ในป๊อปอัป คำเตือนการเรียงลำดับ ใหเลือก ขยายส่วนที่เลือกจากนั้นคลิกที่ ประเภท.
ผล
ตอนนี้คุณพร้อมแล้ว! รายชื่อสุ่มตามภาพด้านล่าง
หากคุณเป็นผู้ใช้ Excel เวอร์ชันใหม่กว่า เช่น Excel สำหรับ Microsoft 365 หรือ Excel 2021 หรือ Excel สำหรับเว็บ รันดาร์เรย์, เรียงลำดับ และ แถว สูตรจะช่วยให้คุณได้รับรายการสับในตำแหน่งที่คุณระบุได้อย่างรวดเร็ว
ขั้นตอนที่ 1: ป้อนสูตร RANDARRAY, SORTBY และ ROWS
เลือกเซลล์ว่างที่คุณต้องการรับผลการสุ่ม พิมพ์สูตรด้านล่าง (โปรดทราบว่าคุณควรเปลี่ยน A2: A8 ในสูตรด้านล่างไปยังรายการเดิมที่คุณต้องการสุ่ม) แล้วกด เข้าสู่.
=SORTBY(A2:A8,RANDARRAY(ROWS(A2:A8)))
(ไม่บังคับ) ขั้นตอนที่ 2: คัดลอกและวางผลลัพธ์ของสูตรเพื่อให้แก้ไขได้
หากคุณต้องการดูผลลัพธ์แบบสุ่ม คุณสามารถทำได้ ข้ามขั้นตอนนี้. หากคุณต้องการแก้ไขรายการสับแบบสุ่ม คุณควรคัดลอกผลลัพธ์ของสูตรและวางเฉพาะค่า:
1. เลือกผลลัพธ์ของสูตรแล้วกด Ctrl + C เพื่อคัดลอก
2. คลิกขวาที่เซลล์ที่คุณจะวางผลลัพธ์ที่คัดลอกไว้ (คุณยังสามารถวางค่าลงในตำแหน่งเดิมได้อีกด้วย)
3 เลือก วางค่าเท่านั้น ตัวเลือกจากเมนูคลิกขวา
ผล
ตอนนี้ คุณจะได้รายการที่สับเปลี่ยนและแก้ไขได้ดังที่แสดงด้านล่าง
หากคุณเบื่อกับการใช้สูตรและตั้งใจที่จะใช้ความช่วยเหลือของ Add-in Kutools สำหรับ Excel's จัดเรียง / เลือกช่วงแบบสุ่ม ฟีเจอร์นี้ช่วยให้คุณจัดเรียงแบบสุ่มได้ง่ายขึ้นด้วยตัวเลือกที่มากขึ้น ขอความกรุณาดังนี้
ขั้นแรก เลือกรายการที่คุณจะสุ่ม แล้วเลือก Kutools > พิสัย > จัดเรียง / เลือกช่วงแบบสุ่ม. ในป๊อปอัป จัดเรียง / เลือกช่วงแบบสุ่ม ใหเลือก ทั้งแถวจากนั้นคลิกที่ Ok.
หากคุณต้องการสุ่มรายชื่อด้วยวิธี VBA โปรดทำดังนี้
ขั้นตอนที่ 1: เลือกรายการที่คุณจะสุ่ม
ขั้นตอนที่ 2: คัดลอกรหัส VBA ไปยังหน้าต่างโมดูล
1 กด Ctrl + F11 เพื่อเปิดโปรแกรมแก้ไข VBA จากนั้นคลิก สิ่งที่ใส่เข้าไป > โมดูล เพื่อเปิดหน้าต่างรหัสโมดูล
2. คัดลอกและวางรหัส VBA ด้านล่างไปที่หน้าต่างโมดูลที่เปิดอยู่
รหัส VBA: สุ่มเรียงลำดับรายการ
Sub RandomSort()
'Update by ExtendOffice
Dim xRg As Range
Dim xNum, xF, xI As Integer
Dim xWSh, xAWSh As Worksheet
On Error Resume Next
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xAWSh = Application.ActiveSheet
Set xRg = ActiveWindow.RangeSelection
Set xWSh = Worksheets.Add
xNum = xRg.Count
For xF = xNum To 1 Step -1
xI = WorksheetFunction.RandBetween(1, xF)
xWSh.Range("A1").Value = xRg.Item(xI)
xRg.Item(xI) = xRg.Item(xF)
xRg.Item(xF) = xWSh.Range("A1")
Next
xWSh.Delete
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub
ขั้นตอนที่ 3: เรียกใช้โค้ด VBA
ในหน้าต่างรหัส กด F5 หรือคลิก ปุ่มเพื่อเรียกใช้รหัสนี้
ผล