wps2016如何做姓名隨機抽取

方法如下：1.首先開啟或編輯好要進行隨機生成姓名的表格。 2.接著可以點選【公式-插入函式】開啟插入函式對話方塊。 3.或者直接在單元格中輸入【indirect】函式，這樣wps2016就能做姓名隨機抽取

第一步，製作抽籤介面。

開啟WPS表格2009，新建一個空白文件。假設一個年級有20個班，在a1單元格中錄入“班主任姓名”，在(a2：a21)單元格區域中錄入班主任姓名在b1單元格中錄入“抽中班級”，在(b2：b21)單元格區域中錄入“未抽籤”字樣若用e3單元格顯示抽籤後抽到的班級，則將e3單元格設定合適的邊框和字號接著執行“檢視→工具→控制元件工具箱”，單擊“命令按鈕”，在e3單元格下方插入兩個按鈕，並在“屬性”視窗中設定Caption選項分別為“抽籤”和“停止”，名稱選項為預設的CommandButton1和CommandButton2。

第二步，為按鈕實現其功能。

雙擊“抽籤”按鈕，開啟程式碼視窗，輸入下列程式碼(該程式碼中包含“停止”按鈕的程式碼)：

Option Explicit

Dim flag As Boolean， i， j， m As Integer

Private Sub CommandButton1_Click()

flag = True '初始化中斷變數 當中斷變數為真時開始抽籤

tiaozhuan1:

For i = 1 To 20 '假如有20個班

DoEvents '釋放程式控制權 允許執行其它事件

For j = 2 To 21 '第2行到21行

If Cells(j， 2) = i Then GoTo tiaozhuan2

Next

Cells(3， 5) = i '即e3單元格顯示迴圈變數的值

If flag = False Then GoTo tiaozhuan3 '如果按下了停止按鈕則退出

tiaozhuan2:

Next

If flag = True Then GoTo tiaozhuan1

'如果一次迴圈結束還沒按下停止按鈕則進行下一次迴圈

tiaozhuan3:

For m = 2 To 21

If Cells(m， 2) = "未抽籤" Then

Cells(m， 2) = Cells(3， 5)

Exit Sub

End If

Next

End Sub

Private Sub CommandButton2_Click()

flag = False '中斷迴圈

End Sub

現在關閉程式碼視窗，退出設計模式，一個抽籤程式就製作好了。當單擊“抽籤”按鈕，在e3單元格中輪流顯示沒有被抽中的班級，單擊“停止”按鈕時e3單元格顯示該班主任抽中的班級，並將抽中的班號自動填寫到相應的單元格中，該班號不再參與下一輪抽籤當下一位班主任單擊“抽籤”按鈕時進行下一輪抽籤

用你給出的陣列的例子，比如在A2:E7範圍內隨機提取一個數字，可以使用OFFSET函式。可以在陣列外的任意一個單元格輸入：

=OFFSET($A$2，RANDBETWEEN(1，5)，RANDBETWEEN(1，4))

即可提取區域內任意一個單元格的內容。

因為資料是不規則的，所以用資料範圍來挑選比較麻煩，而用隨機偏移量，也就是隨機指定單元格的方法比較方便。隨意單元格的位置隨機偏移便是最省力最有效也最快速的選擇。你可以試一下。