要抽獎請Ｅｘｃｅｌ來幫忙

逢年過節，很多大型的商場、超市為了吸引人氣，增加商品銷量，總要搞一些抽獎活動，但傳統的抽獎方式。很多人圍在一起，抽獎效率不高，公正性也難以得到保證，還是讓Excel來幫我們完成這個抽獎任務吧!只需輕點鼠標，即可搞定，真正地做到了公開，公正、公平。

修改《電腦迷》提供的模板

先從本期光盤下載“抽獎器.xlt”并打開，試著自己運，行一下，熟悉一下這個抽獎器的結構。

啟動運行“抽獎器.xlt”時，會先彈出一個。抽獎器系統。的對話框(如圖1)，在該對話框中給出了這個抽獎器的一些幫助信息，將鼠標移到對話框的不同位置，就會在對話框的右上角看到不，同的提示文字。單擊“開始使用系統”按鈕，就可以進入抽獎器系統(如圖2)。我們主要修改的就是圖1、圖2中的提示性文字，從而使抽獎器更具個性化，具體的修改方法如下：

第一步：重新運行“抽獎器.xlt”，當彈出“安全警告”的窗口時，單擊“禁用宏”按鈕，打開抽獎器模板后，另存為“抽獎器.xls”，保存在任意位置；然后按下“A1t+F11”快捷鍵，調出“Visual Basic”編輯器，再展開“窗體”，雙擊打開“進入系統”模塊，根據自己的需要靈活地更改“抽獎器系統”界面中的文字，建議將“抽獎器系統”界面中的標題和幫助更改成和抽獎活動有關的內容，這樣可以起到更好的宣傳作用。

第二步：“抽獎器系統”界面的內容修改完畢后，關閉“Visual Basic”編輯器，然后將“抽獎器”主界面中的文字修改一下，比如可以將標題文字修改為“洪勝手機兩周年店慶抽獎大酬賓”，最后再將標題下面的文字修改為抽獎規則以及每一個獎項各有什么獎品等。

經過這樣的修改之后，圖1、圖2界面中的文字就大變樣了，不但起到了宣傳作用，而且使顧客對抽獎的游戲規則有了很深的了解。

添加抽獎候選人及抽獎設置

添加抽獎候選人

抽獎器的界面文字修改完了之后，開始添加抽獎候選人，也就是抽獎時是從哪些顧客里面抽取。運行抽獎器，在圖2所示的界面中單擊“抽獎候選人”按鈕，打開“抽獎候選人”工作表，在該工作表的A2單元格開始輸入抽獎候選人的名字，需要注意的是每一行單元格只能輸入一個顧客的名字，候選人的名字輸入完畢后，單擊“返回”按鈕，返回抽獎主界面。

抽獎設置

添加完抽獎候選人名單后，在抽獎主界面單擊“獎項設置”按鈕，切換到“獎項設置”工作表，進行抽獎設置，主要是針對獎項，抽獎順序、抽獎方法這幾方面進行設置，設完畢后，單擊“返回”按鈕，返回抽獎界面。

開始抽獎

至此，所有的準備工作都完成了，下面開始抽獎!在抽獎主界面單擊“開始抽獎”按鈕，就會發現抽獎主界面“獲獎名單”下面所有抽獎候選人的名字都滾動起來了，單擊“停止”按鈕，你就會發現有一個獎項已經抽出來了，單擊“繼續抽獎”按鈕，重復上面的過程，直到所有的獎項都抽完為止。抽完獎后，單擊“抽獎結果”按鈕，就可以看到抽獎結果了，如果需要將抽獎結果打印出來，單擊“打印名單”即可(如圖3)。