interior.color1 [기초방] VBA 100제 #53 [ 색상정렬 ] 색상 정렬하는 문제이다. 색상 관련한 문제는 많이 안낸거 같아서 앞으로 2 - 3 개 정도 재밌는 문제로 찾아가려 한다. 코드 진행은 1. 배열에 기본이 되는 색상코드들을 담고 2. 전체영역을 순환하면서 해당 색상이 배열의 몇번째에 위치값을 찾아서 해당 셀을 출력해주면 된다. 3. 이때 배경색과 글자색을 같게 하여 마치 배경만 나온거 처럼 연출한다. 4. 마지막으로 전체영역을 재 순환하며 글자색을 검은색으로 하여 코드를 마무리한다. 더보기 Option Explicit Sub 컬러_정렬() Dim sample() Dim rngAll As Range: Set rngAll = [b4:b10] Dim rngA As Range Dim n&, sm, r& [k4:n10].Interior.Color = xlNone .. 2023. 7. 3. 이전 1 다음