生物行移动版

在Excel中处理包含大量字段的数据表时，查看某行记录往往需要拖动水平滚动条，容易导致误读相邻行数据。通过以下VBA代码，可以实现单击单元格自动高亮整行，提升数据查看的准确性和效率。

操作步骤：

1. 打开目标工作表（例如“Sheet1”），点击菜单栏“工具”→“宏”→“Visual Basic编辑器”。

2. 在左侧工程资源管理器中，双击对应的工作表标签名称（如Sheet1），在右侧代码窗口中输入以下VBA代码：

Private Sub WorksheetSelectionChange(ByVal Target As Range)
    If Target.EntireRow.Interior.ColorIndex = 10 Then
        Target.EntireRow.Interior.ColorIndex = 0
    Else
        Target.EntireRow.Interior.ColorIndex = 10
    End If
End Sub

3. 关闭代码窗口返回Excel。单击任意单元格，该单元格所在行将自动填充绿色高亮（颜色值10对应绿色）。再次单击该行任一单元格，高亮取消。可同时高亮多行以便对比数据。

提示：代码中的颜色索引值可自定义，例如6代表黄色，3代表红色等。此方法比直接单击行号更便捷，适合日常办公。