Excel抽獎可用RANDBETWEEN配合INDEX實現單次隨機抽取；通過COUNTIF與IF控制范圍實現去重多輪抽取；再結合按鈕控件、VBA宏和條件格式打造可視化互動界面。
如果您希望在Excel中快速實現一個簡單有趣的抽獎功能，可以利用RANDBETWEEN函數生成指定范圍內的隨機整數，配合其他基礎函數構建動態抽獎機制。以下是具體實現方式：
本文運行環境：MacBookAir，macOSSequoia。
一、基礎抽獎：單次隨機抽取姓名
該方法適用于從固定名單中實時抽取一名中獎者，RANDBETWEEN生成行號索引，INDEX根據索引返回對應姓名，每次按F9刷新即更新結果。
1、在A1:A20區域輸入20個參與者姓名（如“張三”“李四”等）。
2、在B1單元格輸入公式：=INDEX(A1:A20,RANDBETWEEN(1,20))。
3、按下鍵盤F9鍵，B1內容將立即刷新為A列中任意一個隨機姓名。
二、去重多輪抽獎：避免重復中獎
此方案通過輔助列標記已抽中人員，并結合COUNTIF與IF邏輯控制抽取范圍收縮，確保每輪結果不重復。
1、在C1:C20輸入數字1–20作為原始序號。
三、可視化抽獎界面：按鈕觸發+高亮顯示
借助Excel表單控件插入按鈕，綁定宏實現一鍵刷新，同時設置條件格式讓中獎單元格自動高亮，增強互動趣味性。
1、選中數據區→「開發工具」→「插入」→「按鈕（窗體控件）」，繪制按鈕并指定宏名為RandomDraw。
2、按Alt+F11打開VBA器，在模塊中粘貼代碼：SubRandomDraw():Range("G1").Value=Application.WorksheetFunction.Index(Range("A1:A20"),Application.WorksheetFunction.RandBetween(1,20)):EndSub。
3、右鍵G1單元格→「條件格式」→「新建規則」→「只為包含以下內容的單元格設置格式」→設置字體加粗、背景色為黃色。
以上就是Excel制作一個抽獎小程序Excel隨機函數RANDBETWEEN應用【趣味】的詳細內容，！
