selectionChange 이벤트: 선택한 곳에 이벤트 적용
(ByVal Target As Range) : 무엇(범위, Range)인가 선택할 것인데 그것을 Target이라고 하자.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Interior.ColorIndex = 3 Then
Target.Interior.ColorIndex = 0
Else
Target.Interior.ColorIndex = 3
End If
End Sub
Target.Count: 선택한 셀의 개수
(서식복사 페이지 참조) Range("a" & i).Resize(1, 8).~~~ '"Ai"셀부터 1행 8열만큼 범위를 다시 잡는다.