选中单元格将整行背景色变成红色，VBA代码怎么实现？

如下代码复制进去即可

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Cells.Interior.TintAndShade = 0

r = ActiveCell.Row

Rows(r & ":" & r).Interior.Color = vbRed

End Sub

聪明绝顶康老蔫 • 2022-12-31 17:53:38 • 生活 • 907 • 1 • 0

科技

内容仅供参考，如果您需解决具体问题(尤其法律、医学等领域)，建议您详细咨询相关领域专业人士。