如何利用Excel製作抽獎小程式?
今天和大家聊一個有趣的課題,利用Excel實現抽獎功能。本文的知識點涉及RANDBETWEEN函式和VLOOKUP函式、Excel表格的美化以及簡單的宏錄製和使用,實現抽獎功能不是目的,目的是透過有趣的小案例讓大家加深對相應知識點的理解,舉一反三,用到自己相應的工作環境中。
成果展示 首先來看成果,點選“點選抽獎”,即可實現抽獎功能,如下圖。
準備一份抽獎名單,如下圖。
本文中實現抽獎共能的就是利用隨機數函式RANDBETWEEN函式產生一個隨機數,然後在利用產生的隨機數查詢對應的中獎者的姓名。
RANDBETWEEN函式的語法規則:
=RANDBETWEEN(bottom,top)
=RANDBETWEEN(最小整數,最大整數)
對應圖1中的序號,讓RANDBETWEEN函式從序號1001至1010中產生一個隨機的整數,在單元格中輸入:
=RANDBETWEEN(1001,1010)
或者
=RANDBETWEEN(A2,A11)
這兩個公式差別是一個使用使用具體數值,另一個引用的單元格。
按鍵盤上的F9鍵,發現這個數會發生變化,如下圖。
然後在下方單元格中使用VLOOKUP函式查詢隨機數對應的值。如果對於VLOOKUP函式不熟悉的同學可以參考這篇文章《Excel中的查詢利器,Vlookup函式還是Index搭配Match函式?》
=VLOOKUP(E4,$A$2:$B$11,2,0)
如下圖。
然後再按鍵盤上F9鍵,發現隨機數和中獎者都發生的隨機的變化,至此,抽獎的核心功能就實現了,原理就是用RANDBETWEEN函式產生一個隨機數,然後用VLOOKUP函式查詢隨機數對應的姓名。
點選Excel視窗左下角加號新建一個工作表,作為展示頁面,如下圖。
然後在新建的工作表中單元格中輸入相應內容,例如我這裡在單元格B3輸入的是“恭喜”、單元格B7“您中獎了!”如下圖。
然後再單元格B5中輸入公式:
=VLOOKUP(RANDBETWEEN(1001,1010),Sheet1!$A$2:$B$11,2,0)
這個公式就是VLOOKUP函式嵌套了RANDBETWEEN函式,步驟參考下圖。
透過兩個函式的的使用,實現了抽獎的基本功能,但是如果拿出去用的話還是略顯不好看,所以我們需要對錶格進行美化,使之更像一個抽獎的程式。
首先選擇頁面佈局,點選背景,選擇從檔案,插入一張從網上下載的圖片,如下圖。
我們發現圖片是平鋪了整個工作表。
使用快捷鍵CTRL+A全選整個單元格,右鍵點選單元格格式,選擇填充,在圖案樣式中選擇純白圖案填充。如下圖。
再選擇需要展示的區域,右鍵單擊選擇單元格格式,選擇填充,點選無顏色,然後點選確定,我們發現選擇的區域就出現了填充的背景,將文字顏色改為白色,透過調整行高和列寬,將文字顯示在圖片中間,調整文字大小,這樣就完成了美化。如下圖。
最後調整完的結果如下圖。
按鍵盤上F9,中獎者姓名也發生了改變。
如果每次都需要按鍵盤上F9來抽獎顯得有點麻煩,因此我們透過Excel中的宏功能將按鍵盤上F9重新整理改為一個按鈕。
在選單欄選擇開發工具,點選錄製宏,記住宏名稱或自己設定,點選確定,然後按鍵盤上F9,發現中獎人員發生變化後點擊停止錄製,這樣就完成了宏的錄製。
在選單欄點選插入,選擇形狀,選擇圓角矩形,在頁面下方畫出圓角矩形並更改其格式,是圓角矩形與頁面協調一些。
右鍵單擊圓角矩形,選擇編輯文字,在圓角矩形中輸入點選抽獎並調整字型大小和格式。
右鍵單擊圓角矩形,點選指定宏,選擇前面錄製的宏,點選確定,這樣就將圓角矩形和之前錄製的宏關聯起來了。
點選圓角矩形,即可發現中獎者姓名發生了改變。
步驟如下圖。
由於表格中啟用了宏功能,所以在儲存表格時需要選擇啟用宏的工作薄。
至此,一個使用Excel製作的抽獎小程式就製作完成了。最後還是那句話,實現功能不是目的,目的是透過有趣的小案例讓大家加深對相應知識點的理解,舉一反三,用到自己相應的工作環境中。
感謝您的閱讀。