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

