工作太枯燥，来得小刺激，用excel小小恶搞一下你的同事。
新建一个Excel文档。在工作表标签右键 - 查看代码。
在弹出的窗口的右上角“工程资源管理器” 双击Sheet1，在左边下拉框中选取worksheet后，会自动生成2句代码。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End Sub
然后把下面的代码粘贴到开始和结束语句之间。
MsgBox "电脑温度正在急速升温中！点确定降温", 16 + vbOKOnly, "高温报警"
MsgBox "由于温渡过高，电脑即将爆炸，请在3秒内离开电脑100米距离", 16 + vbOKOnly, "高温报警"
完工！
然后，你让sheet1工作表设置为正在查看状态。然后喊你的同事过来帮你看看公式为什么设置的不对。
当你的同事选取表中的单元格，接下来的场景......
看到上面的提示，你同事的反映是什么呢?：）
兰色说：本文用到的Worksheet_SelectionChange是Excel VBA 事件程序的一种，由于该类程序可以自动触发的特点，它可以用于监控用户的新建Excel表格、输入、打印等常见操作，非常的有用。所以学习VBA的同学一定要关注一下该类程序的使用。
如果你是新同学，长按下面二维码 - 识别图中二维码 - 关注，就可以每天和兰色一起学Excel了。
