본문 바로가기

개발

엑셀VBA 조작하기 - 실시간으로 선택된 행/열 하이라이트하기

선택한 행 전체를 하이라이트 해줍니다.

이런걸 해보겠습니다.

 

전전 또는 전전전 필드값을 확인하며 태깅을 해야할때..

 

손으로 짚어가면서 찾지 마세요.

 

1. 시트 오른쪽클릭 - 코드 보기

2. VBA 코드 입력하기

위와같은 창이 뜨면, 아래 코드를 복사해 넣는다.

Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
'Update 20200430
Static xRow
Static xColumn
If xColumn <> "" Then
    With Columns(xColumn).Interior
        .ColorIndex = xlNone
    End With
    With Rows(xRow).Interior
        .ColorIndex = xlNone
    End With
End If
pRow = Selection.Row
pColumn = Selection.Column
xRow = pRow
xColumn = pColumn
'With Columns(pColumn).Interior
'    .ColorIndex = 6
'    .Pattern = xlSolid
'End With
With Rows(pRow).Interior
    .ColorIndex = 6
    .Pattern = xlSolid
End With
End Sub

행 뿐만 아니라 열도 강조할 수 있다. 작은따옴표로 주석처리된 곳의 작은따옴표를 제거해보자. (초록색 표시된 부분)

.ColorIndex의 숫자를 수정하면 색깔도 바꿀 수 있다. 색깔은 아래 참고