正常情況下抽獎效果如下所示，抽了兩次，結果都是隨機的。(因為是錄屏軟件1秒抓取2張圖片，看起來滾動比較慢，實際滾動速度很快)

馬上就要抽特等獎了，先點擊內定小圈開關，再點開始抽獎，不論什么時候點擊結束，中獎的結果都是小編自己，如下所示：

這樣輕輕松松自己拿大獎了，這是怎么制作的呢？

第一步：在A:B列準備好抽獎的姓名和抽獎的照片，然后找一張喜慶的背景，插入一個藝術字體，幸運大抽獎，如下所示：

第二步：在E1單元格中輸入公式：

=INDEX(A:A,D1)，同時插入一個文本框，將文本框的填充改成無，點擊文本框的邊緣位置，然后在公式輸入框中輸入=E1，這個文本框中便會隨著E1的內容變化而變化。

第三步，在菜單欄填，公式中插入一個名稱管理器，名稱為zp，公式為=INDEX(制作!$B:$B,制作!$D$1)，綁定了D1單元格對應的B列中的照片。

我們在D1單元格任意先輸入一個數字，比如4，然后在頁面上插入任意一張圖片，將格式調整為圓形，在公式編輯欄輸入=zp，綁定照片。

第四步，我們按ATL+F11，在VBA編輯欄中輸入VBA代碼

Dim i, j

Sub 開始()

i = 0

Do

Range("d1") = Application.RandBetween(2, 9)

DoEvents

Loop Until i = 1

End Sub

Sub 結束()

i = 1

If j = 1 Then '如果點了內定

Range("d1") = 9 '結果就是等于9

j = 2 '恢復到普通抽獎

End If

End Sub

Sub 內定()

j = 1 '內定參數為1

End Sub

創建了3個過程，分別是開始，結束，以及內定過程

第五步，在表格中插入三個按紐，分別綁定三個過程

插入一個圓形，右鍵，指定宏

這樣就制作完成了，需要抽到作者自己的時候，那只需要只一下內定的小圓圈，然后再點開始，點結束，抽到的100%就是自己了。

好，你學會了么？自己動手做一下吧！

歡迎留言討論，期待您的點贊和轉發分享

--------------

歡迎關注，更多精彩內容持續更新中....

總結

以上是生活随笔為你收集整理的抽奖随机滚动_老板让我做年会抽奖系统，我用Excel制作内定抽到自己的大奖！...的全部內容，希望文章能夠幫你解決所遇到的問題。

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