[VBA]_更改单元格背景颜色

Private Sub Worksheet_Activate()
    Cells(1, 1).Interior.Color = vbRed
End Sub