什么值得买|如何利用Excel制作抽奖小程序？今天和大家聊一个有趣的课题

今天和大家聊一个有趣的课题，利用Excel实现抽奖功能。本文的知识点涉及RANDBETWEEN函数和VLOOKUP函数、Excel表格的美化以及简单的宏录制和使用，实现抽奖功能不是目的，目的是通过有趣的小案例让大家加深对相应知识点的理解，举一反三，用到自己相应的工作环境中。
成果展示
首先来看成果，点击“点击抽奖” ，即可实现抽奖功能，如下图。

文章图片
准备工作
准备一份抽奖名单，如下图。

文章图片
RANDBETWEEN函数及VLOOKUP函数
本文中实现抽奖共能的就是利用随机数函数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全选整个单元格，右键点击单元格格式，选择填充，在图案样式中选择纯白图案填充。如下图。

文章图片
再选择需要展示的区域，右键单击选择单元格格式，选择填充，点击无颜色，然后点击确定，我们发现选择的区域就出现了填充的背景，将文字颜色改为白色，通过调整行高和列宽，将文字显示在图片中间，调整文字大小，这样就完成了美化。如下图。