[VBA기초] 행단위 배경색 설정

작업을 하다보면 행단위로 내용 파악을 쉽게 하고 싶은 경우가 생긴다.

아래 코드를 입력하면 셀에서 커서가 움직이는 행단위로 배경색이 보인다.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
Cells.Interior.Color = xlNone
If Target.Count = 1 Then
     Range(Cells(ActiveCell.Row, "A"), Cells(ActiveCell.Row, "I")).Interior.Color = RGB(230, 230, 240)
 End If
End Sub