Microsoft Excel

如果需要在 Excel 表格中自動高亮當前行，可按照以下步驟進行：

1. 在 Excel 表格中按 Alt-F11 鍵，開啟 Microsoft Visual Basic for Applications 視窗。
2. 在 Project Explorer 中雙擊 worksheet，出現 Module 視窗，拷貝下面的 VBA 程式碼到該視窗。
3. 儲存並關閉 Module 視窗，返回當前 worksheet。

VBA 程式碼（僅高亮當前行）：

Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Static xRow
Static xColors(100)
If xRow <> Selection.Row Then
  If xRow <> "" Then
    Rows(xRow).Interior.ColorIndex = xlNone
    For i = 1 To UBound(xColors)
      Cells(xRow, i).Interior.ColorIndex = xColors(i)
    Next i
  End If
  xRow = Selection.Row
  For i = 1 To UBound(xColors)
    xColors(i) = Cells(xRow, i).Interior.ColorIndex
  Next i
  Rows(xRow).Interior.ColorIndex = 36
End If
End Sub

VBA 程式碼（同時高亮當前行和當前列，缺點是會清空條件格式）：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Worksheet.Cells.FormatConditions.Delete
pRow = Selection.Row
pColumn = Selection.Column
With Columns(pColumn).Cells
  .FormatConditions.Add xlExpression, , "TRUE"
  .FormatConditions(1).Interior.Color = vbYellow
End With
With Rows(pRow).Cells
  .FormatConditions.Add xlExpression, , "TRUE"
  .FormatConditions(2).Interior.Color = vbYellow
End With
End Sub

WPS 表格

使用“檢視 -> 閱讀模式 -> 開啟閱讀模式”即可。

參考資料

1. How to auto-highlight row and column of active cell in Excel?