什麼?Excel 也能抽籤,簡單易學的步驟,程式幫你準備好了(內含抽獎過程的影片及教學文) | Excel VBA教學
Excel除了處理枯燥的數據,還能用來進行有趣的抽獎活動。您是不是常常找不到合適的抽獎程式,還得忍受無盡的廣告?製作一個屬於自己的抽獎系統,不僅能省去搜尋抽獎工具的時間,也能避免用紙做籤的麻煩。在這篇文章中,我們將提供詳細的教學和抽獎過程的影片,讓您輕鬆掌握Excel抽獎的技巧,讓抽獎變得更加方便和有趣。準備好開始了嗎?一起來看看吧!
▍ 步驟1 :輸入抽獎內容及中獎編號
舉例:編號 T001-T014
▍ 步驟2 :插入函數,並根據輸入的項目更改幾項
中獎編號下方的空白插入函數
舉例:輸入的項目為14項
=INDEX(A2:A15,RANDBETWEEN(1,14))
▍ 步驟3 :按「檔案」>「選項」,「自訂功能區」>打勾「開發人員」
(如果功能區已有「開發人員」可省略)
▍ 步驟4 :點選插入按鈕(表單控制鍵)
▍ 步驟5 :按「Visual Basic」跳出視窗>視窗左側的「模組」Module
▍ 步驟6 :複製以下程式碼
Sub 重抽()
'
'CommandButton1_Click()
Range("C2:E4").Select
ActiveCell.Formula2R1C1 = "=INDEX(RC[-2]:R[13]C[-2],RANDBETWEEN(1,14))"
End Sub
完成!!
🔍歡迎在104學習精靈關注【超級辦公室達人】獲得更多實用的小技巧
✨如果喜歡這篇文,也歡迎免費加入共學✨
