本來不想寫此博客，但今天是休假后第一天上班，為了更快投入工作中，因此開寫。。。

　　年前應(yīng)廠內(nèi)要求，用Excel中的VBA編寫了此套抽獎軟件。之后就想干脆制作一個通用的抽獎軟件，這樣以后只要更新名單便可以用。名單我們一般都是用Excel統(tǒng)計，所以這也是我選擇用Excel制作的主要原因。

?

下載軟件

?

開始上圖：

抽獎主界面（因?yàn)槭桥_資企業(yè)，所以是使用的是繁體，但代碼中已改回簡體了。界面也是在公司里調(diào)的，自己電腦上顯示的不太美觀）

?

后臺設(shè)置界面（“更換抽獎界面背景”還是今天添加進(jìn)去的）：

?

主要說下注意事項(xiàng)（其他的嘛，自己看界面就能一清二楚了）：

1、抽獎名單導(dǎo)入的時候請保留第一行的“工號”及“姓名”，即從第二行開始導(dǎo)入；

2、禁止把《System》工作表刪除；

3、工作表名稱請以“1月22日”或“1月22日一等獎”格式命名，eg：

4、本軟件主要用Rnd隨機(jī)函數(shù)來產(chǎn)生中獎名單，但當(dāng)天內(nèi)人員不會重復(fù)獲獎；

5、每次選獎項(xiàng)時會自動保存數(shù)據(jù)。

?

插曲：

　　（1）一開始編寫的軟件，每次顯示的時候都是從工作表中抓取并顯示，很卡。后來想用內(nèi)存數(shù)組解決，但又覺得幾千人的名單太大了，經(jīng)與Excel精英培訓(xùn)群內(nèi)的群友交流后，毫無猶豫地改用了內(nèi)存數(shù)組處理數(shù)據(jù)。這樣就流暢多了，也同時感謝下那些群友。

　　（2）抽了三天的獎，結(jié)果我們部門二三十人才兩人獲獎，而且還是幾塊的水杯，真是杯具啊！（不過臺資企業(yè)，你懂的）

總結(jié)

以上是生活随笔為你收集整理的用Excel制作抽奖软件的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。