WPS相比Excel來說，有些功能更接地氣，比如聚光燈效果，新版中叫閱讀模式，開啟後瀏覽數據時選中的單元格所在的行和列會自動標色，方便瀏覽數據。
找遍了Excel裡的角角落落，都沒有發現這個功能，這是怎麼回事呢？
其實Excel自身並沒有這個功能，要想實現這樣的效果，就需要自己進行設置，不過設置起來倒也不是很難，只需要兩個步驟即可……
第一步：設置條件格式
選中數據區域，可以選中左上角的單元格，然後同時按住Ctrl shift，再按方向鍵→和↓完成選擇，也可以選中數據區域中的任意單元格後按Ctrl a組合鍵。
依次點擊開始，樣式，條件格式，新建規則，使用公式確定要設置格式的單元格，輸入公式：
=OR(CELL("row")=ROW(),CELL("col")=COLUMN())
到這一步，我們想要的聚光燈效果就已經實現了。
但是，當我們切換選擇單元格的時候，聚光燈效果並沒有自動實現；
而是要按 F9 鍵讓整個工作簿重新計算才可以。
如果想要讓表格自動刷新，還需要添加一段代碼！
第二步：添加自動刷新的代碼
按【ALT + F11】打開 VBA 編輯器：
❶ 在資源管理器中雙擊ThisWorkbook，打開右側的代碼窗口
❷ 輸入以下代碼（建議複製粘貼~）
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)Application.ScreenUpdating = TrueEnd Sub
黏貼進去後，不用保存，直接關閉VBA編輯器，完全自動的聚光燈效果就實現啦~
因為工作簿中有代碼，所以在保存文件的時候，需要將其保存為「Excel 啟用宏的工作簿（*.xlsm）」哦。
看到這裡，聚光燈的問題似乎已經結束了，但一定有些夥伴會說，既然已經都上來vba了，難道就不能不用條件格式嗎？
當然可以……
一步到位的VBA代碼
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Application.ScreenUpdating = False
Cells.Interior.ColorIndex = -4142
'取消單元格原有填充色，但不包含條件格式產生的顏色。
Rows(Target.Row).Interior.ColorIndex = 33
'活動單元格整行填充顏色
Columns(Target.Column).Interior.ColorIndex = 33
'活動單元格整列填充顏色
Application.ScreenUpdating = True
End Sub
直接複製這段代碼就好了，不解釋。
小結
對於Excel的激光燈功能，有幾個問題一定要說清楚：
1、不宜對整表進行設置，僅對有數據的區域設置就好，不然會很卡；
2、對新手而言，使用條件格式的方法容易理解掌握，當然這個公式裡用到了一個cell函數，可能大家還不太熟悉，有需要的話可以留言，後期專門分享這個函數的教程；
3、條件格式不能實現自動刷新，因此必須使用VBA來完善，所以一個很簡單的VBA語句就出現了，對於新手而言，不必懂，但是一定要知道代碼複製到什麼地方；
4、一步到位的VBA代碼固然好，可是總覺得有點缺了點什麼，也許是時候該學一學VBA了……
閱讀更多 孫樹帥老師 的文章
