一、需求

　　【技巧】Excel實現WPS聚光燈效果中的聚光燈具有幾個不足：

　　1、只能在一個工作表中生效；

　　2、只能在單行或者多行生效（即，選中多列或多行，只有單行或單列高亮）。

　　那麼，需求來了。

二、方案

　　純VBA

三、步驟

　　1、開啟VBA編輯器，使用快捷鍵 Alt+F11，滑鼠單擊左側 ThisWorkbook，在右側的空白中輸入以下程式碼（建議複製貼上）

Private Sub workbook_sheetselectionchange(ByVal sh As Object, ByVal target As Range)
    Cells.Interior.ColorIndex 
 
= 0
    For Each target In Selection
        Rows(target.Row).Interior.ColorIndex = 34
        Columns(target.Column).Interior.ColorIndex = 34
    Next
    For Each target In Selection
        target.Interior.ColorIndex = 27
    Next
End Sub

　　2、關閉VBA編輯器視窗，回到Excel表格介面，就可以實現聚光燈效果啦（進階版）

四、效果演示

 五、注意

　　VBA程式碼中的34和27為 ColorIndex的數值，可以更改為自己喜歡的1~56中的任意值。