用VBA方式实现Excel聚光灯效果
Excel聚光灯效果,虽然可以借助EXCEL插件,比如“方方格子” 、“易用宝” 、“KUTOOLS” 等一键完成,但用VBA代码来实现也非常简单。

一、设置条件格式
全选数据区域,在『开始』 菜单找到『条件格式』 ,选择『新建规则』 『使用公式确定要设置格式的单元格』 ,并在公式栏输入以下公式。
=OR(CELL("row")=ROW(),CELL("col")=COLUMN())
然后,设置一个自己喜欢的字体效果和背景填充样式,确定即可。

二、设置视图刷新
用VBA代码实时刷新视图。
我们在『开发工具』 菜单找到 『Visual Basic』 命令,打开VBA代码编辑窗口,双击Sheet1 对象,并在代码区输入以下代码。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.Calculate
End Sub

赞 (0)