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

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

?

下載軟件

?

開始上圖：

抽獎主界面（因為是臺資企業，所以是使用的是繁體，但代碼中已改回簡體了。界面也是在公司里調的，自己電腦上顯示的不太美觀）

?

后臺設置界面（“更換抽獎界面背景”還是今天添加進去的）：

?

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

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

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

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

4、本軟件主要用Rnd隨機函數來產生中獎名單，但當天內人員不會重復獲獎；

5、每次選獎項時會自動保存數據。

?

插曲：

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

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

總結

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

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。