聚光燈效果
活動單元格所在的整行整列,均突出顯示為其他顔色
這種效果在WPS中稱為“閱讀模式”,隻需在視圖頁籤中,切換到“閱讀模式”即可。
但是在Excel中,沒有這個功能,解決方法如下。
關注公衆号“大貓計算機二級”,回複“聚光燈效果”,可下載下傳素材。
第1種解決方案
該方法通過VBA代碼實作,針對該工作簿中的全部工作表生效。
1. 打開Excel工作簿,右擊任意一張工作表的名字,點選“檢視代碼”(或者按快捷鍵 “alt + F11”)
2. 輕按兩下
3.複制下列代碼,粘貼到右側空白位置
Private Sub Workbook_SheetSelectionChange(ByVal Sh As
Object, ByVal Target As Range)
Application.ScreenUpdating = False
Cells.Interior.ColorIndex = -4142
Rows(Target.Row).Interior.ColorIndex = 36
Columns(Target.Column).Interior.ColorIndex = 36
Application.ScreenUpdating = False
End Sub
4. 關閉該視窗,傳回到工作表中。即可看到效果
若要儲存該效果,可将文檔儲存為“啟用宏的工作簿”,即“.xlsm”格式。
第2種解決方案
通過條件格式實作聚光燈效果。隻針對選中的單元格生效。
1. 選中需要實作聚光燈效果的單元格,點選條件格式,建立規則
2. 點選“使用公式确定單元格”,複制下列公式,粘貼到其中。然後點選“格式”
=OR(CELL("ROW")=ROW(),CELL("COL")=COLUMN())
3. 點選“填充”,設定自己喜歡的單元格背景顔色即可,點選“确定。”
4. 點選“确定”即可。
5. 選擇該區域中的任意單元格,按“F9”鍵重新整理即可看到效果。
也可以通過VBA代碼,設定自動重新整理。方法如下:
右擊工作表标簽,點選“檢視代碼”,
複制下列代碼,粘貼到空白位置。然後關閉視窗,傳回至工作表中。即可實作自動重新整理。
Private Sub Worksheet_SelectionChange(ByVal Target As
Range)
Sheet1.Calculate
End Sub