COLORINDEX로 셀의 색을 칠해보자
나는 셀의 색을 칠할때 거의 컬러인덱스만 쓴다.
사실 다른 방법을 모른다.
사실 그중에서도 빨간색만 칠한다.
다른 색도 있을까?
유튜브에 인덱스 넘버별 컬러를 확인한 코드가 있어서 나도 해봤다.
난 왜 이런 생각을 못했을까?
이제 다른 색도 써봐야지
그림에는 1번행이 잘못됐는데, 귀찮으니까, 그냥 업로드
[코드샘플]
Sub COLOR_INDEX()
Dim X As Integer
Dim Y As Integer
X = 1
Do Until Cells(X, 1) = ""
Y = 1
Do Until Cells(X, Y) = ""
Cells(X, Y).Interior.ColorIndex = Cells(X, Y).Value
Y = Y + 1
Loop
X = X + 1
Loop
End Sub
Do - Loop 구문은 왜인지 정이 안간다. 나만 그런가?
